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XM1076,  amd  an  M2HS  Bradley  fighting  vehicle.  Data  were  recorded  during  on- 
and  off-road  operations  at  various  speeds.  All  data,  recorded  from  seat-pad 
triaxial  accelerometers,  were  supplied  as  predigitized  acceleration  records.  # 

The  data  were  frequency  weighted  (British  Standard  6841) ,  and  these  weighted 
statistics  were  evaluated  to  con^are  ride  severity  between  vehicles.  Com¬ 
ponents  of  these  data  were  used  to  develop  acceleration  signatures  to 
realistically  simulate  the  motion  environment  in  TGVs . 

A  conceptual  framework  was  developed  which  enabled  the  salient  features  * 
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a  dose-response  model  for  quantifying  health  effects  resulting  from  exposure 
to  repeated  shocks  zuid  vibration  were  identified,  including  the  potential 
for  biological  recovery  processes .  A  procedure  was  developed  involving 
computer  recognition  of  impulses,  including  shocks  and  other  transient  or 
nonstationary  motions  within  a  background  of  Gaussicui  random,  or  near- 
sinusoidal,  vibration.  Using  this  procedure,  seat  motion  in  TGVs  was 
classified  into  four  categories:  type  1  -  Gaussian  random  motion;  type  2  - 
periodic  deterministic  motion;  type  3  -  intermittent  (nonstationary)  motion; 
and  type  4  -  impulsive  motion,  including  shocks.  The  ranges  of  mean  RMS 
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motions  in  the  x-,  y-,  and  z-axes.  Shock  waves  were  classified  by  initial 
peak  amplitude,  fundamental  frequency,  and  decay  rate  in  the  x-,  y-,  cuid 
z-axes.  A  motion  signature  was  created  mathematically  to  realistically 
simulate  the  motion  environment  of  TGVs  by  synthesizing  two  signals :  one  to 
characterize  the  shocks,  and  the  other  to  characterize  the  near -continuous 
background  vibration. 

This  report,  which  contains  the  analytical  methods  for  characterizing 
the  repeated  impact  environment  of  Array  TGVs  through  analysis  of  recorded 
acceleration  signatures,  provides  a  unique  method  to  characterize  vehicle 
motion.  The  wide  range  of  motion  encountered  in  different  Army  vehicles 
traversing  varying  terrain  is  described.  The  theory  and  logical  framework 
which  incorporated  signal  processing  technicjues  from  diverse  industry  appli¬ 
cations  was  developed  mathematically  to  reconstruct  the  motion  environment. 

The  study  developed  control  signatures  to  realistically  simulate  the  multi - 
axis  acceleration  of  TGVs.  These  signatures  were  inplemented  successfully 
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this  technique  to  construct  motion  signatures  to  assess  the  effect  of 
triaxial  motion  on  humaui  responses. 


■Table  Q1  contents 


INTRODUCTION . . . 1 

PART  A:  THEORETICAL  REPRESENTATION  OF  HUMAN  EXPOSURE  TO  SHOCK 


AND  VIBRATION 

I  Magnitude  characterization  .  3 

1.1  Statistics  of  random  vibration  .  4 

1.2  Vibration  containing  shocks  .  6 

1.3  Shock  waveforms  .  9 

II  Frequency  characterization  .  12 

2.1  Frequency  weightings  specified  by  International 

Standard  ISO  2631  (1978)  and  2631/1  (1985)  .  13 

2.2  Frequency  weightings  specified  by  British  Standard 

BS  6841  (1987)  .  14 

2.3  Frequency  weightings  from  biodynamic  models  .  15 

III  Integrated  dose  measures . 18 


3.1  Dose  measures  in  which  moment  "m"  is  equal  to  root 


3.2  Dose  measures  in  which  moment  ”m"  is  not  equal  to 


root  "r"  . 20 

3.3  Dose  measures  with  recovery  processes . 21 

IV  Dose  estimates  for  exposure  to  shocks . 24 

4.1  Exposure  to  single  shocks  .  24 

4.2  Exposure  to  repeated  shocks  .  25 

4.3  Dose  model  with  recovery  processes . 27 


PART  B:  .ANALYSIS  OF  VEHICLE  SEAT  SHOCK  AND  VIBRATION  DATA 


* 

V  Data  sources  and  processing . 31 

5.1  Sources  of  data . . 

5.2  Digital  processing  of  signals  .  33 


i 


5.3  Data  processing  and  presentation . 35 

VI  Types  of  seat  motion . 39 

6.1  Classification  of  seat  motion  by  computer . 39 

6.2  Verification  of  machine  typing  of  seat  motion  ......  47 

6.3  Seat  motion  observed  in  tactical  ground  vehicles  ...  48 

VII  Shocks  and  repeated  impacts  .  54 

7.1  Shock  definition  .  55 

7.2  Shocks  observed  in  tactical  ground  vehicles  .  56 

7.3  Repetitive  shocks  and  impacts  .  58 

PART  C:  VIBRATION  AND  SHOCK  SIMULATION 

VIII  Signal  generation . 60 

8.1  Shock  and  vibration  simulation  .  60 

8.2  Multi-axis  ride  simulation  facility  .  61 

8.3  Implementation  of  waveforms  on  the  MARS  facility  ...  62 

IX  Exposures  for  experiments  involving  human  subjects  .  65 

9.1  Short-duration  experiments  . 65 

9.2  Long-duration  experiments  .  66 

9.3  Vibration  and  shock  during  experiments  .  68 

9.4  Exposure  signatures  .  69 

CONCLUSIONS . 70 

REFERENCES . . 

TABLES 

FIGURES 


ii 


APPENDIXES 


Appendix  A  Data  acquisition  system 
Appendix  B  Description  of  vehicles 

Appendix  C  FORTRAN  source  code  for  analysis  programs 

Appendix  D  Seat  motion  data  (Note:  Appendix  D-1  to  D- 
23  are  bound  separately) 

Appendix  E  Seat  motion  data  summary  for  cross-country 
operations 

Appendix  F  Seat  motion  shock  data 
Appendix  G  List  of  abbreviations  and  symbols 


iii 


List  of  Figures 


Figure 

Figure 

Figure 

Figure 

Figure 

Figure 

Figure 

Figure 

Figure 

Figure 


1  Examples  of  deterministic  and  random  vibration 
waveforms,  and  shocks  (Griffin,  1990)  [Figure 
reproduced  with  permission  of  Academic  Press] . 

2  Amplitude  probability  density  and  cumulative 
probability  distributions  for  a  random  signal  with 
zero  mean  value. 

3  Shock  time  histories  constructed  using  equation  1.20. 

4  Frequency-weighting  functions  derived  from 
international  standard  ISO  2631  (1978)  and  ISO  2631/1 
(1985)  . 

5  Magnitudes  of  health-related  frequency-weighting 
functions  contained  in  British  standard  BS  6841 
(1987) . 

6  Single  degree-of-freedom  biodynamic  model  for  human 
response  to  vibration  and  shocks. 

7  Mean  normalized  apparent  mass  of  60  subjects  (±1 
standard  deviation) ,  shown  as  magnitude  and  phase, 
compared  with  the  response  of  the  Fairley  and  Griffin 
model  (Fairley  and  Griffin,  1989) .  [Figure  reproduced 
with  permission  of  J  Biomechanics] . 

8  Relationship  between  exposure  to  repeated  shocks  and 
spinal  injury,  and  discomfort  for  seated  persons 
(Allen,  1977) . 

9  Example  of  grouping  DRI  values  to  construct  magnitude 
windows  for  assessing  the  hazard  of  exposure  to 
multiple  shocks.  [Adapted  from  Allen,  1977]. 

10  Block  diagram  of  measurement  and  analysis  methodology 
(Griffin,  1990) .  [Figure  reproduced  with  permission 
of  Academic  Press] . 


iv 


Figure  11  Seat  motion  analyzed  using  frequency  weighting  in 
British  standard,  BS  6841  (1987).  Signal  type  1: 
Gaussian  random  motion. 

Figure  12  Seat  motion  analyzed  using  frequency  weighting  in 

British  standard,  BS  6841  (1987).  Signal  type  2:  Near 
sinusoidal  low-frequency  motion. 

Figure  13  Seat  motion  analyzed  using  frequency  weighting 

in  British  standard,  BS  6841  (1987).  Signal  type  2: 
Near  sinusoidal  high-frequency  motion. 


Figure  14  Seat  motion  analyzed  using  frequency  weighting  in 
British  standard,  BS  6841  (1987).  Signal  type  3: 
Transient  (intermittent)  random  motion. 

Figure  15  Seat  motion  analyzed  using  frequency  weighting 

in  British  standard,  BS  6841  (1987).  Signal  type  3; 
Transient  (intermittent)  sinusoidal  motion. 

Figure  16  Seat  motion  analyzed  using  frequency  weighting  in 
British  standard,  BS  6841  (1987).  Signal  type  2: 
Amplitude-modulated  near-sinusoidal  motion. 


Figure  17  Seat  motion  analyzed  using  frequency  weighting  in 
British  standard,  BS  6841  (1987).  Signal  type  4: 

Impulses  (shocks) .  Course;  Churchville  B  -  Hilly 
Cross  Country:  Grades  to  29%. 


Figure  18  Seat  motion  analyzed  using  frequency  weighting  in 
British  standard,  BS  6841  (1987).  Signal  type  4: 
Impulses  (shocks).  Course:  Cross-Country  #3;  Rough 
Loam. 


Figure  19  Seat  motion  analyzed  using  frequency  weighting 

in  British  standard,  BS  6841  (1987) .Signal  type  2: 
Oscillatory  motion  with  impulses  (shocks) . 

Figure  20  Seat  motion  analyzed  using  frequency  weighting  in  the 
ISO  standard,  ISO  2631  (1985).  Signal  type  1: 

Gaussian  random  motion. 


V 


Figure  21  Seat  motion  analyzed  using  frequency  weighting  in  the 
ISO  standard,  ISO  2631  (1985).  Signal  type  2:  Near 
sinusoidal  motion. 


Figure  22  Seat  motion  analyzed  using  frequency  weighting  in  the 
ISO  standard,  ISO  2631  (1985).  Signal  type  3: 
Transient  random  motion. 

Figure  23  Seat  motion  analyzed  using  frequency  weighting  in  the 
ISO  standard,  ISO  2631  (1985).  Signal  type  4: 

Impulses  (shocks) . 

Figure  24  Seat  motion  analyzed  using  Fairley-Grif f in  biodynamic 
model.  Signal  type  1:  Gaussian  random  motion. 

Figure  25  Seat  motion  analyzed  using  Fairley-Grif fin  biodynamic 
model.  Signal  type  2:  Near  sinusoidal  motion. 

Figure  26  Seat  motion  analyzed  using  Fairley-Grif fin  biodynamic 
model.  Signal  type  3:  Transient  random  motion. 

Figure  27  Seat  motion  analyzed  using  Fairley-Grif fin  biodynamic 
model  (Table  2).  Signal  type  4:  Impulses  (shocks). 

Figure  28  Seat  motion  containing  impulses  (shocks)  analyzed 
using  frequency  weighting  in  British  standard,  BS 
6841  (1987)  during  cross-country  operation  of  MlAl  (X 
direction) . 

Figure  29  Seat  motion  containing  impulses  (shocks)  analyzed 
using  frequency  weighting  in  British  standard,  BS 
6841  (1987)  during  cross-country  operation  of  MlAl  (Y 
direction) . 

Figure  30  Seat  motion  containing  impulses  (shocks)  during 

cross-country  operation  of  MlAl  (Z  direction  -  no 
frequency  weighting) . 


Figure  31  Working  definition  of  shocks. 


Figure  32  Seat  motion  waveform,  containing  shocks,  during 
cross-country  operation  of  M2HS  Bradley. 


Figure  33  Detail  from  the  seat  motion  waveform  in  Figure  29 
showing  shock  event  #4. 

■ 

Figure  34  Detail  from  the  seat  motion  waveform  in  Figure  29 
showing  shock  event  #5. 

Figure  35  Seat  motion  waveform,  containing  repeated  impacts, 
during  cross-country  operation  of  M109A3. 

Figure  36  Simulated  Gaussian  random  motion. 

Figure  37  Limits  of  motion  established  for  subject  safety  at 
the  MARS  facility. 

Figure  38  Exposure  signature  -  short-term  1. 

Figure  39  Exposure  signature  -  short-term  2. 

Figure  40  Exposure  signature  -  short-term  3. 

Figure  41  Exposure  signature  -  short-term  4. 

Figure  42  Exposure  signature  -  short-term  5. 

Figure  43  Exposure  signature  -  short-term  6. 

Figure  44  Exposure  signature  -  long-term  1. 

Figure  45  Exposure  signature  -  long-term  2. 

Figure  46  Exposure  signature  -  long-term  3. 

Figure  47  Exposure  signature  -  long-term  4. 

^  Figure  48  Exposure  signature  -  long-term  5. 

Figure  49  Exposure  signature  -  long-term  6. 


vii 


Li, St  nl  lables 


Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 

Table 


1  Relationships  between  even  order  moments  and  roots, 
their  corresponding  root  mean  values  and  the  RMS 
value,  for  random  vibration  (Gaussian  distribution) . 

2  Values  of  parameters  for  single  degree-of-freedom 
biodynamic  model. 

3  Definition  of  root  mean  and  integrated  dose  values 
for  equal  even  order  moments  /n  and  roots  r  . 

4  Computer  programs  developed  for  data  analysis. 

5  Vehicles  tested  at  W.E.S. 

6  Letourneau  ride  course  at  W.E.S. 

7  Vehicles  tested  at  Aberdeen  proving  grounds. 

8  Ride  courses  at  Aberdeen  proving  grounds. 

9  Higher-order  root  mean  and  dose  measures  used  in  the 
analysis  of  data. 

10  Types  of  seat  motion. 

11  Summary  of  motion  recorded  in  the  Z-direction  at  the 
commander's  seat  of  the  M2HS  Bradley. 

12  Mean  values  of  RMS  acceleration  recorded  in  TGVs  for 
type  1  seat  motion. 

13  Mean  values  of  RMS  acceleration  recorded  in  TGVs  for 
type  2  seat  motion. 

14  Shock  parameters  recorded  in  the  Z-direction  at  the 
commander's  seat  of  the  M2HS  Bradley  during  cross¬ 
country  operation. 


viii 


Table  15  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  X-direction. 

Table  16  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  Y-direction. 

Table  17  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  Z-direction. 

Table  18  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  X-direction  during 
cross-country  operation. 

Table  19  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  Y-direction  during 
cross-country  operation. 

Table  20  Summary  of  shock  parameters  observed  at  the  seats  of 
tactical  ground  vehicles  in  the  Z-direction  during 
cross-country  operation. 

Table  21  Exposure  conditions  for  short-duration  experiments. 

Table  22  Exposure  conditions  for  two-hour  experiments. 

Table  23  Exposure  conditions  for  one-hour  experiments. 

Table  24  VDV  and  RMS  accelerations  short-duration  experiments. 

Table  25  VDV  and  RMS  accelerations  long-duration  experiments. 


V 


This  document  is  the  second  report  on  the  development  of  a 
standard  for  the  health  hazard  assessment  of  mechanical  shock  and 
repeated  impact  in  army  vehicles.  The  objectives  of  the  project 
are : 

•  to  review,  analyze  and  summarize  state-of-the-art  knowledge 
of  the  health  hazards  associated  with  whole-body  vibration 
and  repeated  impact  (Phase  1) ; 

•  to  characterize  the  repeated  impact  environment  of  tactical 
ground  vehicles  (TGVs)  through  analysis  of  recorded 
acceleration  signatures,  and  to  develop  methods  for  realistic 
simulation  of  the  TGV  acceleration  environment  (Phase  2) ; 

•  to  identify  those  biomechanical,  physiological  and 
pathological  human  responses  that  are  essential  for  the 
prediction  of  injury  risk,  and  to  measure  the  responses  of 
volunteer  subjects  under  simulated  conditions  of  TGV 
vibration  (Phase  3  and  4);  and 

•  to  develop  and  validate  a  dose-effect  model  that  will  serve 
to  predict  the  risk  of  injury  to  the  soldier  when  exposed  to 
the  repeated  impact  environment  of  TGVs  (Phase  4  and  5) . 

This  report  fulfills  the  requirement  of  phase  two  of  the 
project's  scope  of  work,  and  the  second  objective.  It  contains 
the  analytical  methods  for  characterizing  the  vibration,  shock 
and  repeated  impacts  to  which  occupants  of  TGVs  may  be  exposed. 
This  information  is  used  to  characterize  the  seat  motion  recorded 
in  TGVs,  and  to  develop  acceleration  signatures  for  simulation  of 
their  motion  environment. 

The  development  of  the  theoretical  framework  with  which  to 
characterize  vehicular  motion  is  inevitably  mathematical  in 
nature,  and  is  presented  succinctly  in  Part  A  of  the  report.  The 
report  is  structured  so  that  the  reader  who  wishes  to  avoid  the 
mathematical  complexities  may  omit  Part  A. 
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Introduction 


Vibration  consists  of  oscillations  that  are  characterized  by 
zero  mean  displacement,  or  rotation.  There  is  generally  no  net 
translational  motion,  though  the  oscillation  may  be  referred  to  a 
moving  frame  of  reference  (e.g.  a  moving  vehicle) .  The  extent  of 

*  the  oscillation  defines  the  magnitude  of  the  motion,  while  the 
(time)  rate  of  oscillation  defines  its  frequency.  For 
convenience  and  clarity,  several  types  of  oscillatory  motion  are 
commonly  distinguished  in  the  literature,  and  will  be  referred  to 
in  this  report.  Examples  of  the  different  waveform  types  are 
shown  in  figure  1  (Griffin,  1990) .  When  the  character  of  future 
oscillations  may  be  determined  by  past  oscillations  of  a  system, 
the  motion  is  considered  to  be  deterministic  in  nature  (e.g.  the 
"sinusoidal"  or  "multi-sinusoidal"  waveforms  in  figure  1) . 
Deterministic  waveforms,  or  signals  as  we  shall  commonly  call 
them  when  discussing  aspects  of  signal  processing,  may  occur  as 
periodic  (e.g.  sinusoidal)  or  non-periodic  motion  (e.g.  the 
transient  and  shoclc  waveforms  in  figure  1)  .  A  second  class  of 
signals  (considered  non-deterministic)  are  those  in  which  future 
motion  of  a  system  is  unrelated  to  its  past  motion.  This 
important  class  of  signals  includes  random  vibration.  The 
properties  of  random  signals  must  be  described  statistically. 

The  basic  characteristics  of  such  signals  are  described  as:  1) 
stationary  (or  "ergodic"),  that  is,  with  amplitude  properties 
that  are  statistically  time  independent  (see  the  "stationary 
random"  signal  in  figure  1);  or  2)  non-stationary,  that  is,  with 
time-dependent  waveform  statistics,  as  displayed  by  the  "non- 
stationary  random"  signal  in  figure  1. 

The  classification  of  physical  data  as  being  either 
deterministic  or  random  may  be  argued  in  some  cases.  The  signals 
shown  in  figure  1  are  representative  of  the  forms  of  seat  motion 
observed,  and  serve  to  provide  a  framewor)c  for  discussion  of  the 
signal  processing  methods  developed  in  this  report.  In  practice, 
combinations  of  these  signals  frequently  occur.  This  leads  to 
complexities  in  establishing  the  appropriate  acceleration 

•  magnitudes  and  frequencies,  which  are  necessary  to  determine 
human  responses  and  health  effects. 

Of  primary  concern  to  this  study  is  the  specification  of 

^  human  response  to  vibration  containing  mechanical  shoclcs,  jolts 

or  impacts.  The  term  "shoc)c"  is  used  here  to  describe  a 
mechanical  input  to  the  human  body  (force,  displacement,  velocity 
and/or  acceleration)  that  causes  forced  disturbances  in  the 
relative  positions  of  body  parts.  Such  relative  motion  of  body 
parts  may  result  in  excessive  strains  within  tissues,  ligaments 
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or  bones.  In  this  report,  the  characterization  and  simulation  of 
shocks  and  whole-body  vibration  for  the  assessment  of  human 
health  effects  are  considered. 

The  quantification  of  the  salient  features  of  seat  motion, 
and  their  integration  into  a  measure  of  dose  are  considered  in 
Part  A.  An  analytical  description  of  the  statistics  of  Gaussian 
random  vibration  is  provided  in  which  higher-order  mean  values  * 

are  introduced.  Several  methods  for  characterizing  individual 
and  repeated  shocks  are  described,  involving  both  statistical  and 
waveform  based  measures.  The  latter  measure  suggests  a  model 
suitable  for  shock  waveform  synthesis. 

Dose  models  for  exposure  to  shocks  and  vibration  with 
arbitrary  waveforms  are  then  introduced,  after  establishing  the 
magnitudes  of  vibrations  at  different  frequencies  that  are 
considered  to  be  equally  harmful,  by  means  of  frequency  weighting 
functions.  The  discussion  includes  the  potential  for  biological 
recovery  processes  (time  dependant  tissue  properties  such  as 
visio-elasticity  or  repair  mechanisms)  to  occur  both  during  and 
after  exposure,  and  uses  a  formalism  suitable  for  machine 
computation . 

Part  A  of  the  report  provides  the  mathematical  concepts  and 
tools  that  are  required  first  to  characterize  the  seat  motion  in 
tactical  ground  vehicles  (TGVs) ,  and  then  to  simulate  common 
features  of  this  motion.  It  also  contains  several  dose  concepts 
that  may  be  validated  during  the  experimental  phases  of  the 
project.  This  part  of  the  report  is  inevitably  mathematical  in 
nature  and  may  be  omitted  at  first  reading. 

The  seat  motions  recorded  in  a  range  of  TGVs  during  off-  and 
on-the-road  operations  are  described  in  Part  B,  together  with 
values  of  key  measures  derived  from  these  exposures .  A  procedure 
involving  computer  recognition  of  impulses,  including  shocks,  and 
other  transient  or  non-stationary  motions  within  a  background  of 
stationary  (Gaussian)  random,  or  near-sinusoidal,  vibration  is 
used  to  classify  vehicle  seat  motion  into  four  categories.  A 
detailed  classification  of  shock  waveforms  is  then  employed  to  • 

analyze  the  shocks  recorded  at  the  seats  of  TGVs  from  which 
representative  shocks  may  be  deduced. 

In  Part  C,  the  synthesis  of  the  shocks  and  background 
vibration  employed  to  simulate  seat  motion  and  exposures  in  TGVs  * 
is  described.  These  signals  are  designed  for  use  in  Phase  3  of 
the  project:  the  pilot  laboratory  experiments.  A  number  of 
different  shock  signatures  are  constructed  in  which  the 
amplitude,  rise  time  (frequency),  number  of  shocks  per  minute. 
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and  background  level  are  varied.  The  signatures  are  intended  to 
be  representative  of  seat  motion  observed  in  the  military 
vehicles.  The  protocol  for  these  pilot  experiments  is  also 
described  in  Part  C.  These  experiments  are  designed  to  provide 
information  for  planning  the  main  experiments  to  be  conducted 
during  Phase  4  of  the  project. 
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Vehicle  motion  over  uneven  terrain  results  in  seat  motion 
(displacement  and  acceleration)  that  contains  random  and 
deterministic  components.  Methods  of  analysis  for  the  assessment 
of  human  responses,  including  health  effects,  commonly  differ  for 
these  two  components  when  the  latter  contain  impulses  or  shocks. 
In  this  Section,  methods  for  estimating  the  acceleration 
magnitude  of  shocks  with  or  without  background  vibration  are 
described.  The  methods  depend  on  the  underlying  variation  in 
signal  amplitude  with  time. 

Whole-body  vibration  is  a  continuous  function  of  time,  t  , 
as  may  be  seen  from  the  examples  in  figure  1.  Such  a  function 
may  readily  be  represented  by  its  peak,  or  extreme,  values  of 
acceleration:  the  maximum  positive  value  Cn,ax  maximum 

negative  value  although  these  may  poorly  represent  a 

"typical"  value  for  the  motion.  As  vibration  is  defined  as  a 
motion  with  zero  mean  value,  it  is  necessary  to  employ  a 
description  of  signal  properties  that  leads  to  non-zero  measures 
of  "typical"  magnitudes  of  the  motion.  It  is  customary  in  the 
literature,  therefore,  to  express  the  average  acceleration 
magnitude  of  vibration  in  a  time  interval  T  by  its  root  mean 
square  (RMS)  value,  • 


In  this  equation,  the  instantaneous  value  of  the  acceleration 
time  history,  or  waveform,  at  time  t  is  given  by  the  continuous 
function  a{t) . 

The  "peakedness"  in  the  waveform  may  then  be  expressed  by 
the  crest  factor,  which  is  the  ratio  of  the  maximum  range  in 
amplitude,  positive  and  negative,  to  the  RMS  value: 

CREST  (1.2) 


A 


1 . 1  Statistics  nl.  random  vibration 


There  are  alternate  and,  for  the  purposes  of  the  present 
^  work,  more  appropriate  descriptions  of  the  magnitude  of  random 

vibration.  These  depend  on  amplitude  variation  of  the  signal  in 
time,  which  may  be  described  statistically.  Specifically,  the 
magnitude  of  a  random  vibration  may  be  described  in  terms  of  the 

•  properties  of  its  constituent  amplitude  distribution,  as  shown  in 
figure  2.  In  this  diagram,  the  waveform  ait)  shown  in  figure  2A 
is  considered  to  have  been  constructed  from  a  sequence  of 
elementary  time  intervals,  at  each  of  which  the  motion  possessed 
a  different  acceleration  magnitude.  The  frequency  of  occurrence 
of  each  acceleration  magnitude  "a"  during  the  sequence  forms  the 
acceleration  amplitude  probability  density  distribution  shown  in 
figure  2C.  The  expected  value  of  the  acceleration-time  function 
(now  written  for  simplicity  a  =  ait))  is  defined  by  its 
acceleration  amplitude  probability  density  distribution,  pia) ,  in 
terms  of  the  second-  and  higher-order  moments  E(a^)...Eia")  (Bendat 
and  Piersol,  1986).  Thus,  for  the  second-order  moment,  or  "mean 
squared"  acceleration,  the  expected  value  is: 

Eia^)=j_^a^  pia)da  (1.3) 

and  for  the  n'^-order  moment : 

Eia'')=j^_a’'  pia)da  (1.4) 

For  a  Gaussian,  or  "normal",  random  distribution,  inserting 
the  appropriate  form  for  the  acceleration  amplitude  probability 
density  distribution  in  equation  1.3  leads  to  (Bendat  and 
Piersol,  1986) : 

£(a^)=a^  (1.5) 

where  a  is  the  standard  deviation  of  the  Gaussian  random 
^  distribution.  Thus,  in  this  formalism,  the  RMS  acceleration 

becomes : 

(\RMS)=[Eia^)Y=o  (1.6) 

♦ 

This  expression  for  the  RMS  value  of  the  motion,  which  is 
applicable  to  Gaussian  random  signals,  should  be  compared  with 
the  more  general  definition  in  equation  1.1. 
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If  the  root  mean  value  for  the  m‘^=2n‘*'  order  moment  is 

defined  from  the  corresponding  expected  value  by  forming  the  m'^ 
root,  as  done  in  equation  1.6  for  the  RMS  value,  then,  in  ^ 

general : 

[E{a-)f  p{a)daj'' 

where  m=2,4,6,8,...erc. 

A  relationship  may  now  be  derived  between  the  root  mean 
value  and  the  RMS  value  (Bendat  and  Piersol,  1986),  which  may  be 

shown  for  stationary  signals  with  a  Gaussian  random  amplitude 

distribution  to  be: 

^{RMS)  L  *=1 

The  relationships  between  the  even-order  moments,  their 
corresponding  root  mean  values,  and  the  RMS  value  are  listed  in 
table  1.  Note  that  the  SI  units  of  all  root  mean  values  are 

m  s~^,  and  all  odd-order  moments  are  identically  equal  to  zero. 

It  can  be  seen  from  table  1  that  the  root  mean  value 
associated  with  the  fourth-order  moment  (i.e.  m-4)  may  be 
appropriately  termed  the  root  mean  quad  acceleration  (or  RMQ 
acceleration)  where: 

^RMQ)  —  1-  (1.9) 

for  Gaussian  random  vibration. 

The  existence  of  quantitative  relationships  between  higher- 
order  root  mean  values  and  the  RMS  value  may  be  employed  as  a 
test  of  the  shape  of  the  amplitude  distribution  of  the  signal. 

In  this  way,  the  nature  of  seat  motion  may  be  characterized 
according  to  signal  content,  for  example  (Gaussian)  random 
vibration.  This  subject,  namely  the  classification  of  vibration 
signals  into  types,  is  of  considerable  importance  to  the  present 
study,  and  is  discussed  in  detail  in  Sections  VI  and  VII. 

The  probability  density  function  may  be  accumulated  over  all 
possible  acceleration  amplitudes  to  form  a  cumulative 
acceleration  amplitude  probability  distribution,  shown  in  figure 


(1.7) 


2B.  As  the  cumulative  probability  distribution  is  constructed 
from  a  series  of  acceleration  amplitudes  measured  within 
elementary  time  intervals  and  their  frequency  of  occurrence,  it 
follows  that  this  distribution  also  determines  the  fractional 
time  at  which  the  signal  is  above  or  below  a  given  acceleration 
magnitude.  A  cumulative  probability  may  then  also  be  associated 
with  each  mean  value.  These  are  listed  in  table  1  for  Gaussian 
random  vibration,  and  indicate  that  the  RMT  value  corresponds  to 
a  cumulative  probability  of  P(a)=0.97.  The  cumulative 
probability  associated  with  each  root  mean  value  provides  another 
test  for  the  presence  of  non-periodic  or  non-stationary  signals, 
and  may  be  used  to  advantage  to  establish  the  presence  of  shocks 
within  an  otherwise  random  vibration.  The  theoretical  foundation 
for  this  test  is  described  in  the  following  subsection. 


L.2  Vibration  containing  shobks 

The  existence  of  shocks  within  a  background  vibration  can  be 
expected  to  cause  the  amplitude  probability  distribution  of  the 
composite  motion  to  deviate  from  the  probability  distribution  of 
its  constituent  background  vibration,  when  the  shocks  exceed  some 
minimum  magnitude.  The  presence  of  shocks  in  an  otherwise 
stationary  random  or  periodic  deterministic  motion  can  therefore 
be  established  from  the  shapes  of  the  acceleration  amplitude 
probability  density  distribution  and  the  cumulative  probability 
distribution.  Such  changes  in  the  distribution  will  be  reflected 
in  the  relative  magnitudes  of  the  expected  values,  £(a").  The 
corresponding  root  mean  values  will  deviate  from  the  ratios 
listed  in  column  3  of  table  1  for  a  Gaussian  random  motion.  The 
cumulative  probability  associated  with  each  root  mean  value 
(column  4,  table  1)  will  also  change  to  reflect  the  change  in  the 
amplitude  distributions.  For  example  a  series  of  shocks 
superimposed  on  a  background  of  lower  magnitude  random  vibration 
will  tend  to  increase  the  value  of  higher  order  moments,  root 
mean  values,  and  cumulative  probabilities.  This  concept  is 
demonstrated  in  the  comparison  of  values  in  table  1  with  the 
results  of  figure  18. 


1.2.1  Impulsiveness 

♦  An  alternative  measure  of  the  magnitude  of  vibration  that 

retains  a  specific  probability  value  may  be  obtained  by 
calculating  the  impulsiveness  of  a  waveform  (Brammer  and  Keith, 
1992) .  This  magnitude  measure  may  be  defined  as: 
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(1.10) 


where  a'^  and  a~  are  positive  and  negative  amplitudes, 
respectively,  exceeded  for  a  fraction  of  time  specified  by  the 
cumulative  probability,  P(a).  As  the  cumulative  probability 
function  P(a)  is  constructed  from  a  series  of  acceleration 
amplitudes,  measured  within  elementary  time  intervals,  and  their 
frequency  of  occurrence,  it  follows  that  this  function  also 
determines  the  fractional  time  at  which  the  signal  is  above  or 
below  a  given  acceleration  magnitude.  Values  for  these 
amplitudes  may  be  derived  from  the  amplitude  probability  density 
function  (figure  2),  since: 

Prob[<3"  <a<a*'^=j‘'  p(a)da  =P(a*)-P(a~)  (1.11) 

In  this  equation,  P{d^)  and  Pia~)  define  the  required  probability 
value  for  the  cumulative  probability  distribution  function,  i.e. 

P(a*)-P(a~)=P(a)  (1.12) 

For  example  when  P(a)=0.91 ,  then  the  signal  lies  between  a~  and  a* 

for  97%  of  the  total  time  and  exceeds  a~  or  for  3%  of  the 
total  time. 

It  should  be  noted  that  the  impulsiveness  as  defined  here, 
although  directly  related  to  the  amplitude  statistics  of  a 
signal,  does  not  depend  on  the  probability  distribution 
possessing  a  particular  shape.  In  consequence,  the  impulsiveness 
will  provide  a  measure  of  the  magnitude  of  amplitude  excursions, 
including  shocks,  exceeded  a  specified  fraction  of  the  time, 
irrespective  of  whether  the  background  vibration  consists  of 
Gaussian  or  non-Gaussian  motion.  Hence,  a  comparison  between  the 
values  of,  say,  when  P(a)  and  ^(rms)  ^  vibration  of 

unknown  characteristics  will  provide  information  on  its 
constituent  signals  (i.e.  its  waveform  and  the  shape  of  the 
acceleration  amplitude  probability  distribution) .  Reference  to 
table  1  reveals  that  these  parameters  will  be  equal,  and  in 
principle  equal  2.16,  if  the  signal  is  Gaussian  random  in  nature. 
The  magnitude  and  form  of  discrepancies  in  the  values  of  these 
two  parameters  may  be  used  in  the  classification  of  shock  and 
vibration  signals  (see  Section  VI) . 
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It  should  also  be  noted  that  the  impulsiveness  equals  the 
crest  factor  when  and  a~=aj^,  i.e.  when  P(fl)=1.0.  The 

’  latter  measure  is,  of  course,  more  simply  defined  in  the  time 

domain,  without  reference  to  the  amplitude  statistics  of  the 
signal,  that  is,  by  equation  1.2. 


1.2.2  Higher-order  root  mean  values 

The  characterization  of  shock  and  vibration  magnitudes  for 
the  assessment  of  health  effects  may  also  be  undertaken  using 
parameters  defined  in  the  time  domain,  without  reference  to  the 
statistical  properties  of  the  motion.  Thus,  a  generalized  time- 
averaged,  or  "root  mean",  measure  may  be  constructed  using  the 
form  of  equation  1.1,  viz: 


^RM)- 


'  1  ft  „ 

LfJo  “ 


(1.13) 


where  m  is  an  integer. 

Reference  to  the  preceding  subsection  indicates  that  non¬ 
zero  root  mean  values  will  be  defined  when  m  is  even.  Measures 
that  have  frequently  been  used  in  the  literature  to  characterize 
shocks  include  RMS  acceleration,  when  m=2  (i.e.  equation  1.1), 
and  RMQ  acceleration,  which  is  defined  when  m=4: 


^RMQ)  - 


iV* 


(1.14) 


This  definition  should  be  compared  with  that  derived  from 
the  amplitude  probability  density  distribution  of  the  signal  in 
Section  1.1.  Reference  to  Section  1.1  and  table  1  suggests  that 
the  higher  the  order  of  the  root  mean  value,  that  is,  the  greater 
the  value  of  m,  the  closer  the  measure  will  approach  the  peak 
amplitude  of  the  waveform.  Values  of  m  up  to  m=10  have  been 
employed  by  Wikstrom  et  al.  (Wikstrdm  et  al.,  1991),  and  values 
up  to  m=12  (fljfAfT-)  have  been  used  in  the  present  work.  For 
example,  figure  11  shows  Gaussian  random  motion  having  values  of 
ajinfQ=O.Sl ,  aKHfj-=lAl  and  a:,n„=2.34  m-5"^ .  It  should  be 

noted  that  the  measures  described  by  equations  1.13  and  1.14  are 
equally  applicable  to  all  forms  of  vibration,  as  well  as  to 
shocks.  This  observation  leads  to  the  concept  of  generalized 
dose  measures  for  assessing  human  exposure  to  shocks  and/or 
vibration,  and  is  discussed  in  Section  III, 
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■1 . 3  Shock  waveforms 


Waveform-specific  measures  of  shock  magnitude  may  be  » 

constructed  for  selected,  idealized  shock  time  histories,  such  as 
triangular  or  trapezoidal  shapes.  The  idealized  shock  profile 
may  then  be  expressed  in  terms  of  the  peak  acceleration, 
velocity,  displacement  or  jerk,  and  the  shock  duration,  with  the  ^ 

rise  time  and  decay  rate  as  implicit  variables  (see,  for  example, 
Griffin,  1990) .  The  present  discussion  is  directed  at  a 
description  of  shock  time  histories  suitable  for  simulating 
shocks,  for  use  in  the  pilot  laboratory  experiments. 

A  simple,  but  generalized,  model  is  therefore  employed  to 
describe  the  shock  time  history  in  terms  of  the  maximum 
acceleration  amplitude,  frequency,  /(=co/27u),  and  decay  rate,  6. 

It  is  based  on  an  exponentially  decaying  sinusoid,  which  may  be 
represented  as: 

=  (1.15) 

An  arbitrary  shock  shape  may  then  be  constructed  from  a 
series  consisting  of  n  such  terms,  each  of  which  possesses  its 
own  amplitude,  frequency  and  decay  rate,  identified  by  the 
subscript  k  . 


a{t)  sin  (co*r)]c  (1.16) 

*=i 

The  frequencies  of  the  terms  in  this  series  are  harmonically 
related,  viz: 

co^ /27t=/,,/2,/3,...  for  k  =  etc.  (1.17) 


where : 


etc. 


(1.18) 


For  use  in  waveform  simulation,  a  boxcar  function  must  also 
be  introduced,  in  order  to  define  the  shock  uniquely  in  time 
(see,  for  example,  Otnes  and  Enochson,  1978) .  This  function  has 
a  "top-hat"  profile  in  the  time  domain,  with  unity  magnitude 
within  the  time  range  from  -7/2  to  7/2  and  zero  magnitude 
outside  this  range,  viz: 


w 
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U{t)  = 


\  for -T l2<t<T n 
0  otherwise 


(1.19) 


The  model  for  constructing  shock  time  histories  then 
becomes : 


a{t)=U{t  +  T 1 2)YX^k  sin  (1.20) 

*=i 

Examples  of  shock  time  histories  constructed  using  this 
model  are  shown  in  figure  3.  It  is  evident  that  damped 
sinusoidal  shock  profiles,  and  profiles  with  different  rise 
times,  may  readily  be  constructed  by  appropriate  selection  of  the 
parameters  in  equation  1.20. 

As  the  purpose  of  this  report  is  first  to  characterize,  and 
then  simulate,  the  repeated  shock  environment  of  tactical 
military  land  vehicles,  it  is  appropriate  to  consider  only  those 
measures  of  shock  magnitude  that  can  subsequently  be  employed 
during  the  laboratory  phases  of  the  study.  The  application  of 
the  model  to  the  classification  of  shock  waveforms  recorded  at 
the  seat-body  interface  is  described  in  Section  VII,  and  its  use 
for  shock  simulation  in  Section  VIII. 
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II  Frequency  characterization 


Human  response  to  vibration  is  known  to  depend  on  the 
frequency  of  the  motion.  The  frequency  components  of  a  waveform 
are  obtained  from  its  Fourier  transform  (see,  for  example, 
Chatfield,  1989) .  Thus  for  a  signal  in  the  time  domain,  such  as 
the  acceleration  at  the  seat-body  interface  ait),  its  Fourier 
'transform,  A(£o)  may  be  defined  by: 


A(co)=  r  (2.1) 

oe 

where  /=^/=T.  It  should  be  noted  that  the  frequency  function  A(Cl)) 
contains  both  real  and  imaginary  parts,  which  are  commonly 
represented  by  magnitude  and  phase,  respectively. 

A  frequency  weighting  may  now  be  introduced  to  take  into 
account  the  variation  in  human  response  to  different  vibration 
frequencies.  The  frequency  weighting  function  H(a))  is  designed 
to  adjust  the  relative  magnitudes  of  various  frequency  components 
and  so  must  take  the  form  of  the  inverse  of  a  frequency  contour 
of  equal  human  responses.  The  frequency  weighting  function  is 
thus  specified  by  an  equi-noxious  contour,  which  may  be  defined 
arbitrarily,  theoretically  or  from  subjective,  physiological  or 
pathological  human  responses  to  vibration.  The  function  is 
commonly  assumed  to  be  independent  of  the  magnitude  of  the  input 
motion.  While  this  assumption  is  of  limited  applicability  to 
biological  systems  subjected  to  extreme  impacts,  its  use  results 
from  a  lack  of  knowledge  of  the  non-linearity  between  the  input 
motion  and  the  resultant  strains  induced  within  the  body.  In 
general,  the  relationship  between  human  responses  to  stimuli  at 
different  frequencies  may  involve  both  magnitude  and  phase 
information,  and  so  is  represented  by  a  complex  function. 
Application  of  the  frequency  weighting  function  to  A(co)  results 
in  a  weighted  frequency  spectrum: 

Am,(o))=A(co)H(co)  (2.2) 

A  measure  of  the  magnitude  of  the  hazard  posed  by  vibration 
containing  many  frequencies  may  now  be  obtained  by  performing  an 
inverse  Fourier  transform  on  the  weighted  frequency  spectrum. 


2k 


(2.3) 


The  resulting  time  domain  signal,  which  now  represents  a 
measure  of  the  instantaneous  magnitude  of  the  vibration  hazard, 
is  the  frequency  weighted  acceleration  at  time  t  .  The  hazard 
magnitude  during  the  course  of  exposure  to  vibration  may  now  be 
established  by  applying  the  methods  described  in  Section  I  to 
O-wU) /  to  construct,  for  example,  the  frequency  weighted  RMS 
acceleration , 

The  remainder  of  this  Section  is  devoted  to  the 
specification  of  functions  to  represent  the  hazard  posed  by 
oscillatory  motion  at  different  frequencies.  The  potential  for 
representing  the  response  of  the  body  to  shocks  can  be  expected 
to  be  influenced  by  the  waveform  shape.  This  expectation 
requires  both  magnitude  and  phase  information  to  be  retained 
during  analysis,  in  order  to  characterize  the  potential  health 
hazard  of  deterministic  motion.  It  should  be  noted  that  some 
common  frequency  weightings  described  in  the  following 
subsections  do  not  provide  phase  information,  and  so  would  not  be 
expected,  a  priori,  to  define  a  consistent  measure  of  the  health 
effects  of  shocks. 

The  sequence  of  mathematical  operations  described  by 
equations  2. 1-2. 3  may  readily  be  implemented  by  computer. 

Details  of  the  apparatus  and  procedures  used  for  processing 
acceleration  time  histories  recorded  at  the  seats  of  military 
vehicles,  based  on  these  equations,  are  to  be  found  in  Section  V. 


Frequency  weightings  specified  hy  international  Standard  ISO 
(1978)  ^  2631/1  (1985) 

The  International  Organization  for  Standardization's  (ISO) 
standard  2631  (1985)  provides  guidance  on  the  measurement  and 
assessment  of  vibration  in  three  orthogonal,  translational  axes 
X,  Y,  and  Z,  for  which  health  exposure  limits,  applicable  to 
given  exposure  durations,  are  specified.  The  coordinate  axes  are 
centered  at  the  heart,  but  the  exposure  limits  have  universally 
been  applied  to  vibration  recorded  at  the  seat-body  interface. 

The  vibration  limits  are  specified  for  1/3  octave  bands. 

Provision  for  frequency  weighting  all  frequencies  of  interest 
simultaneously,  in  the  manner  described  in  the  previous 
subsection,  is  specified  in  terms  of  the  reciprocal  of  the 
vibration  limits,  with  a  weighting  factor  of  unity  in  the 
frequency  band  possessing  greatest  transmission.  The  values  of 
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the  frequency  weighting  functions  so  formed  are  shown  in  figure 

4 . 


It  should  be  noted  that  the  procedure  adopted  by  the  ISO  for 
the  definition  of  frequency  weighting  functions  is  inherently 
problematic.  Firstly,  only  values  for  the  magnitude  of  the 
frequency  weighting  may  be  derived  from  the  vibration  limits. 

The  phase  information  is  lost  in  the  process  of  forming  1/3 
octave  bands.  Secondly,  the  frequency  weighting  functions 
contain  points  of  inflexion  (elbows)  and  arbitrarily  terminate  at 
prescribed  upper  and  lower  frequencies,  neither  of  which 
properties  can  be  expected  to  reflect  human  responses. 

In  addition,  the  standard  makes  no  claim  to  be  applicable  to 
shocks,  and  specifically  excludes  vibration  with  a  large  crest 
factor.  The  largest  crest  factor  to  which  the  standard  is 
considered  to  apply  is  somewhat  uncertain,  both  in  view  of  the 
revision  in  Amendment  1  (1982)  from  3  to  6,  and  of  the  lack  of  a 
clear  definition  of  crest  factor  itself. 

Nevertheless,  the  International  Standard  continues  to 
represent  the  broadest  consensus  of  the  effects  of  whole-body 
vibration  on  man,  despite  a  continuing  attempt  to  improve  it  for 
more  than  ten  years.  The  standard  is,  however,  generally 
recognized  to  be  in  need  of  revision,  with  the  most  likely 
outcome  being  close  to  that  adopted  by  the  British  Standards 
Institute,  BS  6841  (1987)  (Village  et  al.,  1992).  It  should  be 
noted  that  some  elements  of  the  British  standard,  such  as  the 
frequency  weightings,  are  contained  in  the  draft  revision  of  the 
International  Standard. 


2_._Z  Frequency  weightings  specified  iiy  British  standard  6841 

(1987) 

The  British  standard  (BS)  6841  (1987)  "Guide  to  measurement 
and  evaluation  of  human  exposure  to  whole-body  vibration  and 
repeated  shocks"  provides  a  solution  to  the  problems  associated 
with  the  frequency  weightings  derived  from  the  International 
Standard.  The  British  standard  is  based  on  the  fifth  draft  of 
the  long-term  revision  of  ISO  2631,  and  so  may  be  considered  to 
reflect,  at  least  in  part,  the  thinking  within  the  international 
community  at  that  time  (1984) . 

The  primary  goal  of  the  British  standard  is  to  provide 
unambiguous  guidance  on  the  measurement  of  human  exposures  to 
vibration  and  shocks,  and  some  guidance  on  the  assessment  of 
their  relative  severities.  It  attempts  to  provide  reliable 
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procedures  for  quantifying  the  severity  of  all  forms  of  multi¬ 
axis,  multi-frequency,  random,  stationary  and  non-stationary 
vibration,  and  repeated  shocks. 

To  this  end,  frequency  weighting  functions  are  fully 
defined,  in  magnitude  and  phase,  both  for  frequencies  at  which  a 
health  hazard  is  believed  to  exist,  and  outside  that  frequency 
range.  A  unique,  frequency  weighted  acceleration  time  function 
will  thus  result  from  application  of  the  health-related,  and 
band-limiting,  frequency  weightings  contained  in  this  standard  to 
an  arbitrary  vibration  signal.  The  frequency  weightings 
applicable  to  vibration  at  the  seat,  (Z  axis)  and  Wd  (X  and  Y 
axes)  are  shown,  in  magnitude  only,  in  figure  5.  The 
corresponding  filter  equations  are  detailed  in  the  standard. 


2.. .3  Frequency  weightings  from  blodynamiC  models. 

There  have  been  many  attempts  to  predict  the  response  of  the 
human  body  to  whole-body  vibration  or  shocks  by  means  of  a 
biodynamic  model  (Village  et  al.,  1992).  The  models  tend  to  be 
based  on  analytical  convenience  rather  than  physiological  or 
pathological  mechanisms.  They  may  be  designed  to  model  the 
response  of  the  total  body,  or  a  biological  subsystem,  such  as 
the  spine.  In  consequence,  a  model  commonly  consists  of 
mechanical  components,  such  as  masses,  springs  and  dampers,  the 
magnitudes  of  which  are  fitted  to  experimental  values  of  selected 
human  responses  to  vibration  and  shocks  (von  Gierke,  1971) . 

At  the  present  state  of  knowledge,  the  possible  complexity 
of  biodynamic  models  far  exceeds  the  potential  for  establishing 
meaningful  values  for  each  "mechanical"  component.  Most  models 
only  predict  a  single  output  response  as  a  function  of  frequency 
(e.g.  upper  body  motion  resulting  from  input  to  the  seat),  thus 
permitting  the  fitting  of  few,  truly  independent  parameters.  In 
these  circumstances,  it  is  appropriate  to  introduce  only  the 
simplest  models,  with  least  components,  that  offer  potential  for 
assessing  the  health  effects  resulting  from  exposure  to  repeated 
shocks,  and  vibration. 

The  simplest,  single-degree-of-freedom,  lumped-parameter 
model  consists  of  a  mass,  M ,  connected  to  a  source  of  motion  by 
a  spring  with  stiffness  K  and  a  viscous  damper  with  resistance 
^  to  motion,  C.  It  can  readily  be  shown  that  the  frequency 

response  function  for  the  base  excited  mechanical  system  sketched 
in  figure  6  is  (Griffin,  1990) ; 
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(2.4) 


H(co)= 


K + j'coC 
A'+icoC-co^M 


It  is  customary  to  express  this  frequency  weighting  function  in 
terms  of  the  undamped  natural  (resonance)  frequency  of  the 
system: 


(2.5: 


and  the  damping  ratio,  which  is  the  fraction  of  the  critical 
damping,  and  may  be  written  as: 

\-CIC„  where  =  (2.6 

With  these  substitutions,  equation  2.4  becomes: 

1  +  2/^fe) 


H(co)  = 


(2.7) 


I* 


Application  of  equation  2.7,  or  2.4,  to  the  frequency 
function  corresponding  to  an  acceleration  time  history,  by  means 
of  equations  2.1  to  2.3,  results  in  a  frequency  weighted 
acceleration  that  now  represents  the  output  of  the  model.  As  the 
frequency  response  function  of  the  model  is  completely  described 
in  both  magnitude  and  phase  at  all  frequencies,  a  unique, 
frequency  weighted  acceleration  time  function  will  result. 

For  the  purposes  of  the  present  work,  values  of  parameters 
for  the  single-degree-of-freedom  model  have  been  obtained  from 
two  sources,  and  are  listed  in  table  2.  The  first  model  is 
chosen  to  be  representative  of  the  most  precise  measurement  of 
human  response  to  small  amplitude  vibration  (Fairley  and  Griffin, 
1989) ,  and  the  second  because  of  its  widespread  acceptance  for 
evaluating  spinal  injury  from  exposure  to  large  amplitude  single 
shocks  in  the  Z  direction  (Payne,  1975) .  The  differences  between 
the  values  of  the  parameters  employed  by  the  two  models  reflects, 
in  part,  the  different  human  responses  being  modelled,  and  the 
magnitude  of  the  mechanical  non-linearity  of  the  biological 
components . 

An  indication  of  the  agreement  between  human  data  and  the 
predictions  of  the  Fairley-Grif fin  model  can  be  seen  from  figure 
7.  In  this  diagram,  the  magnitude  and  phase  of  the  apparent 
dynamic  mass  of  the  seated  human  body  (i.e.  dynamic 
force/acceleration)  when  subjected  to  vertical  vibration  is 
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compared  with  the  predictions  of  the  model.  The  human  data  from 
60  persons,  24  males,  24  females  and  12  children,  ranging  in  age 
from  7  to  69  years,  have  been  normalized  by  the  static  weight  of 
each  individual.  It  is  evident  that  close  agreement  between 
predicted  and  measured  values  can  be  obtained  at  all  frequencies 
up  to  20  Hz,  which  is  approximately  four  times  the  frequency  of 
the  main  body  resonance  (5  Hz) . 

The  application  of  the  Payne  model  to  the  assessment  of 
human  exposure  to  shocks,  usually  described  in  terms  of  the 
Dynamic  Response  Index  (DRI),  is  discussed  in  Section  IV. 


*- 
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Ill  Integrated  dose  measures 


The  purpose  of  an  integrated  dose  measure  is  to  provide,  in 
a  single  formula  or  procedure,  a  unified  treatment  of  vibration 
exposures,  whatever  the  nature  of  the  motion  experienced  by  the 
body  -  be  it  continuous,  intermittent,  random,  periodic, 
transient,  single  or  multiple  shocks,  and  single  or  multi-axis. 
While  at  first  sight  the  specification  of  such  a  measure  may 
appear  to  be  an  ambitious,  perhaps  even  unachievable,  goal,  it 
has,  nevertheless,  been  attempted  in  some  standards  (e.g.  BS 
6841,  1987),  and  in  the  derivation  of  some  dose  measures  (e.g. 
Griffin,  1982) .  The  advantages  of  an  integrated  dose  measure  are 
self-evident,  although  there  is  no  evidence  in  the  literature  to 
determine  whether  the  same  measure  will  apply  to  different  health 
effects,  and/or  subjective  responses  to  vibration.  The  concept 
is  developed  here  to  provide  a  framework  for  assessing  the 
exposures  recorded  in  TGVs,  and  for  interpreting  the  laboratory 
experiments . 

A  generalized  dose  function  for  exposure  to  shocks,  and/or 
vibration,  for  an  extended  period  of  time,  T,  which  may 
encompass  a  workday,  may  be  formed  from  a  single-number  measure 
of  the  magnitude  of  the  hazard  at  time  t  ,  for  example  the 
frequency  weighted  acceleration  aw{,t),  by  constructing: 


(3.1) 

In  this  expression,  m  and  r  are  constants  representing  the 
moment  and  root  of  the  dose  measure  respectively. 

To  establish  an  estimate  of  the  dose  using  equation  3.1,  it 
will  be  necessary  to  determine  an  appropriate  measure  of:  (a)  the 
magnitude  of  the  stimulus,  using  methods  described  in  Section  I; 
(b)  the  relative  hazard  presented  by  vibration  at  different 
frequencies,  as  discussed  in  Section  II;  and  (c)  the  combined 
effect  of  vibration  in  different  directions.  In  addition,  it 
will  be  necessary  to  specify  values  for  parameters  m  and  r  . 

Dose  measures  that  may  be  employed  to  quantify  the  health 
effects  from  exposure  to  repeated  shocks  and  vibration  are 
described  in  the  following  subsections. 
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3  ■  1  Dose  measures  in  which  moment  Iml  is  equal  is  rosi  111 
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A  series  of  generalized  dose  measures  may  be  defined  for 
/7i=r=2,4,6,...  etc.  The  six  lowest-order  functions  are  listed  in 
table  3.  The  origins  of  these  functions  may  be  deduced,  for 
m=r=2,  by  examining  equations  1.1,  2. 1-2. 3  and  3.1.  If  equation 
1.1  had  involved  the  frequency  weighted  acceleration  time 
history,  a^{t),  rather  than  the  acceleration  time  history,  then, 
clearly : 


(3.2) 


and: 


.2-^(RMS)  [Tf^ 


(3.3) 


Hence,  this  dose  function  may  be  constructed  from  the  RMS 
frequency  weighted  acceleration,  and  is  usually  described  as  the 
energy-equivalent  dose.  The  adequacy  of  this  dose  measure  for 
the  assessment  of  health  effects  resulting  from  exposure  to 
shoc)cs  has  been  repeatedly  questioned  in  the  literature  in  that 
it  may  underestimate  the  severity  of  an  exposure  containing  large 
amplitude  shoc)cs  (see,  for  example.  Village  et  al.,  1992).  When 
considering  the  suitability  of  alternate  dose  measures  involving 
higher-order  root  mean  values  for  the  assessment  of  human 
exposure  to  Gaussian  random  vibration,  it  should  be  recognized 
that  all  dose  measures  of  the  type  defined  by  equation  3.1  for 
which  m=r  (e.g.  as  in  table  3)  will  be  related.  They  differ 
only  by  a  numerical  constant  and  power  of  time. 

For  example,  the  next  two  dose  functions  in  the  series  after 
that  in  equation  3.3,  for  which  /n  =  r  =  4  and  m  =  r  =  6,  may  also  be 
written  in  terms  of  the  RMS  acceleration,  by  virtue  of  the 
numerical  relationship  between  a  higher-order  root  mean  value  and 
the  RMS  value  for  Gaussian  random  vibration  (see  equation  1.8  and 
table  1) : 

(3,4) 


and: 


D{ay,  — 1.57  ciw{ms)\TY'‘ 
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It  is  apparent  from  a  comparison  of  equations  3. 3-3. 5  that 
exposures  to  a  given  RMS  Gaussian  random  acceleration  for 
different  times  will  result  in  doses  that  differ  primarily  in  the 
power  of  the  exposure  duration.  The  ratio  of  the  two  lowest- 
order  dose  functions  clearly  demonstrates  this  difference  in  the 
power  of  the  time  function.  Thus,  from  equations  3.3  and  3.4: 


^(Qw>^)4,4 

D(a^/,T)2  2 


=i.32[rr^ 


An  assessment  of  the  accuracy  with  which  such  dose  functions 
represent  health  effects  from  exposure  to  Gaussian  random 
vibration  may  thus  be  established  from  exposures  to  such  motion 
for  different  times.  The  numerical  constants  in  equations  3.3- 
3.6  will,  of  course,  be  different  for  exposures  containing  non 
Gaussian  shock  and  vibration.  However,  equivalent  relationships 
will  be  derivable  for  exposures  of  varying  duration  to  shocks  and 
vibration,  in  circumstances  in  which  the  acceleration  amplitude 
probability  density  distribution  does  not  change. 

For  translational  motion  containing  both  shocks  and 
vibration,  the  dose  measure  with  m  =  r  =  4  has  been  proposed  by 
Griffin  as  the  preferred  measure  of  human  response  (Griffin, 

1984)  .  In  Griffin's  terminology,  the  vibration  dose  value,  VDV, 
is  given  by: 

VDV  =  ^(fljv>^)4.4  (3.7) 

This,  and  successively  higher-order,  dose  functions  are 
related  to  increasingly  higher-order  root  mean  values,  as  is 
evident  from  table  3.  The  latter,  in  turn,  more  closely 
approximate  the  peak  value  of  a  waveform.  Hence  the  higher-order 
dose  functions  will  progressively  give  more  emphasis  to  shocks  in 
comparison  with  random  vibration.  This  property  of  higher-order 
dose  functions  is  directly  relevant  to  the  objectives  of  the 
present  study,  and  so  dose  functions  with  moment  and  order  of  up 
to  12  have  been  employed  in  the  analysis  of  seat  motion  data  (see 
Sections  VI  and  VII) . 
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2-^  measures  in  moment  "/y?”  is.  not  eoual  to  root  "r" 

Integrated  dose  functions  for  exposure  to  shocks  and 
vibration  may,  of  course,  be  constructed  in  which  m^r.  Dose 
functions  in  which  m>2  and  r=l  have  been  explored  by  Griffin 
and  Wickstrom  et  al.  (Griffin,  1982,  Wickstrom  et  al.,  1991).  In 
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general,  the  properties  of  these  functions  are  equivalent  to 
those  of  the  preceding  section  with  the  same  value  of  m. 

However,  relationships  between  dose  functions  with  different 
values  of  m  are  significantly  affected.  For  example,  the 
relationship  between  the  two  lowest-order  dose  functions  becomes: 

D(aw^T')A.\  _ <^w(RMQ)  (3.8) 

D{aw,T)2] 

For  Gaussian  random  vibration,  this  equation  becomes,  by 
virtue  of  the  numerical  relationship  between  RMQ  and  RMS: 


D{ciw  ,T)2] 


=  3a 


2 

W(RMS) 


(3.9) 


This  relationship  should  be  compared  with  the  corresponding 
relationship  for  dose  functions  in  which  m=r,  namely  equation 
3.6.  It  is  evident  from  the  markedly  different  form  of  these 
equations  that  conclusions  concerning  comparisons  of  human 
responses  evaluated  using  a  sequence  of  dose  functions  in  which 
r=l,  as  by  Wickstrom  et  al.  (Wickstrom  et  al.,  1991),  cannot  be 
applied  to  dose  functions  defined  as  in  Section  3.1.  When  r=l, 
the  ratio  of  the  dose  functions  is  independent  of  time,  whereas 
in  equation  3.6  (r=m)  the  ratio  of  the  dose  functions  is  a  time 
dependent  function. 

A  dose  measure  for  head  injury  from  impacts  has  been 
proposed  in  which  m  =  2.5  and  r  =  l  (see,  for  example,  Griffin, 

1990).  This  measure,  which  employs  the  acceleration  time  history 
of  the  impact  without  applying  any  frequency  weighting,  has  been 
developed  into  a  severity  index  that  has  been  incorporated  into 
regulations  for  vehicle  equipment  and  helmets  (Versace,  1971) . 


3 . 3  Dose  measures  with  recovery  prQCe,S^£LS 

The  dose  measures  introduced  so  far  in  this  Section,  while 
integrating  the  effects  of  exposure  to  oscillatory  motions  with 
different  magnitudes  and  waveforms,  do  not  account  for  the 
temporal  pattern  of  hazardous  events.  Thus,  such  dose  measures 
do  not  allow  for  the  existence  of  biological  recovery  mechanisms 
that  may  mitigate  the  potential  health  effect  some  time  after  an 
event  has  occurred,  or  while  exposure  to  whole-body  vibration 
and/or  shock  is  continuing.  The  development  of  dose  measures 
that  include  recovery  mechanisms  is  of  considerable  interest  to 
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this  study,  for  inclusion  in  the  dose-effect  models  to  be 
constructed  during  the  latter  phases  of  the  project. 

The  generalized  dose  function  of  equation  3.1  may  readily  be 
modified  to  account  for  the  sequence  of  individual  hazardous 
events,  by  segmenting  the  acceleration  time  history  from  which  it 
was  constructed  into  a  time  series.  If  the  u**  element  of  the 
time  series  occurs  at  time  t,  where  u  =  1,2,3,... etc. ,  and  the  elements 

of  the  time  series  are  separated  in  time  by  6r,  then  we  may 
write : 


%(0  =>%(«),  a^^,(t  +  bt)=^ay^r(u  +  l),  ...  etc.  (3.10) 

The  dose  occurring  during  a  time  interval  AT  consisting  of 
n  elements  of  the  acceleration  time  series,  i.e.  AT=n5t,  is 
then : 


6,E5Ja„,Ar]„,=  ^  (3.11) 

where  k  =  1,2,3,... N  . 

In  this  way,  the  dose  function  may  be  constructed  from  a 
series  of  terms,  with  dose  elements  8^  being  computed  for 

successive  time  intervals,  each  of  duration  AT.  The  total  dose 
occurring  during  exposure  to  N  such  dose  elements  in  a  time 
T(=NAT)  is  then: 


\yr 


(3.12) 


Equations  3.11  and  3.12  should  be  compared  with  the  original 
generalized  dose  function,  equation  3.1.  Although  the  equations 
are  conceptually  similar,  the  fundamental  difference  between  them 
is  that  each  dose  element,  and  the  time  during  the  exposure  it 
occurred,  is  now  identified  by  the  value  of  k  .  Thus,  commencing 
with  the  most  recent  dose  element  (i.e.  k=N),  the  modified  dose 
function  may  be  written: 

=5^+5^-!  + 5^-2+ 5]^-3+—  (3.13) 

This  expression  can  be  seen  to  list  the  dose  elements  in  the 
reverse  order  in  which  they  were  experienced.  Hence  the  health 
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effect  resulting  from  individual  dose  elements  may  now  be 
weighted  to  allow  for  recovery  processes  (see,  for  example, 

^  Chatfield,  1987),  viz: 

=  Co5^  +  C]5^_j  +  C2  5^_2+C35;vr_3+...  (3.14) 

«  where  the  Cj  are  weights  constructed  to  give  less  weight  to 

exposure  elements  that  occurred  further  in  the  past. 

It  is  beyond  the  scope  of  this  report  to  derive  appropriate 
values  for  these  weights,  though  it  is  anticipated  that  a  dose 
function,  such  as  equation  3.14,  will  be  employed  in  the  analysis 
of  the  laboratory  experiments.  An  intuitively  attractive  set  of 
weights  for  modelling  biological  recovery  processes  may  be  formed 
by  a  geometric  series,  in  which  each  successive  weight  in 
equation  3.14  decreases  by  a  constant  ratio.  An  appropriate 
series  for  the  weights  is  then: 

Cj=i\-ay  where  y  =  0,1,2,...  (3.15) 

and  a  is  a  constant  such  that  0  <  a  «1. 

Equation  3.14  may  then  be  written  by  introducing  the 
expression  for  the  weights  as: 

=  5;^  +  (1  -  a)5;,_, +(1  -  a)2  5)^-2 +•••  (3.16) 

This  form  of  the  dose  function  leads  to  a  recursion  formula 
suitable  for  machine  computation: 

^^K’7'L,=5;.  +  (l-a)[5;,_,+(l-a)  5;,.2+...]  (3.17) 

or : 

^  =  5^  +  (l— a)D^_j[aiv,r— Ar]^^  (3.18) 
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IV  Dose  estimates  for  exposure  to  shocks 


The  development  of  dose  measures  for  human  exposure  t.o 
shocks  appears  to  have  proceeded  independently  of  comparable 
measures  for  whole-body  vibration.  In  essence,  the  former 
focussed  on  the  time  history  of  the  shocks,  to  quantify  specific 
health  or  injury  issues  (e.g.  head  injury  during  vehicle  crash, 
or  back  injury  during  pilot  ejection).  The  latter  tended  to 
focus  on  responses  to  different  vibration  frequencies,  to 
quantify  issues  such  as  discomfort. 

It  should  be  noted  that  the  application  of  shock-specific 
measures  to  motion  consisting  of  both  shocks  and  whole-body 
vibration  will  need  the  types  of  stimuli  to  be  separated,  and 
assessments  performed  separately  for  exposure  to  the  shocks,  and 
to  the  vibration.  The  separation  of  shocks  from  other  forms  of 
vibration  is  problematic,  requiring  a  unequivocal  definition  of  a 
shock.  Moreover,  the  combination  of  the  two  exposure  components, 
assessed  by  different  methods,  to  obtain  a  total  dose  has  not  yet 
been  attempted. 

An  intuitively  more  satisfactory  approach  to  the  assessment 
of  exposure  to  shocks  and  vibration  is  to  derive  an  appropriate 
integrated  dose  measure.  This  avoids  the  problems  of  signal 
separation,  parallel  assessments  of  hazard,  and  a  combination  of 
assessments  based  on  different  methods.  In  this  Section  measures 
are  introduced  that  have  beed  used  for  the  assessment  of  spinal 
injury  in  a  seated  person.  These  measures  consider  single  or 
repeated  shocks  from  motion  in  the  Z  direction.  An  integrated 
dose  model  which  would  utilize  such  measures  is  then  briefly 
considered. 


.-I  Exposure  jiQ  single  shocks 

The  potential  for  injury  to  the  spine  from  rocket-propelled 
aircraft  ejection  seats  has  been  the  subject  of  much 
investigation,  and  led  to  the  development  of  the  DRI  (Payne, 

1975) .  In  the  terminology  of  Section  II,  the  DRI  is  a  single- 
degree-of-freedom  biodynamic  model  of  the  human  spine  with 
supporting  structures.  The  magnitude  of  the  index,  from  which 
the  potential  for  spinal  injury  is  derived,  is  based  on  the 
maximum  compression  of  the  spring  of  the  model  in  response  to  the 
shock  waveform  input  to  the  base  (see  figure  6) .  The  maximum 
compression  of  the  spring  will  correspond  to  the  peak  strain  on 


the  spine  in  the  Z  direction.  This  may  be  expressed  in  the  form 
of  a  non-dimensional  index  by: 


t 


DRI 


max 


s 


(4.1) 


where  is  the  maximum  spring  compression,  and  g  is  the 

acceleration  due  to  gravity. 


An  equivalent  measure  for  evaluating  exposure  to  the  less 
intense  shocks  expected  to  occur  during  TGV  operation  may  be 
constructed  using  a  biodynamic  model  that  better  represents  the 
response  of  the  upper  body  to  less  intense  seat  motion.  Such 
models  have  been  derived  from  the  measured  dynamic  response  of 
the  human  body  (Fairley  and  Griffin,  1989) ,  or  proposed  for 
various  body  subsystems  (see,  for  example,  Allen,  1978b) .  For 
the  reasons  discussed  in  Section  II,  the  Fairley-Grif f in  model 
has  been  chosen  in  the  present  study,  to  provide  an  analysis  of 
seat  motion  based  on  a  biodynamic  model  (see  Section  VI) . 


Exposure  tJi  repeated  ehocke 

The  concept  of  the  DRI  has  been  extended  by  Allen,  and 
others,  to  the  evaluation  of  repeated  shocks  experienced  by 
seated  persons  in  the  Z  direction  (Allen,  1977,  1978a,  Payne, 
1991,  Village  et  al . ,  1992).  For  this  purpose,  a  relationship 
has  been  proposed  between  the  severity  and  number  of  repeated 
shocks.  The  severity  is  expressed  by  the  magnitude  of  the  DRI, 
and  the  number  of  shocks  is  measured  over  a  24  hour  period. 
Equi-noxious  contours  may  then  be  constructed  for  the  risk  of 
spinal  injury  and  discomfort  for  seated  persons,  as  shown  in 
figure  8  (Allen,  1977) . 

A  procedure  for  implementing  this  relationship  has  been 
adopted  by  the  Air  Standardization  Coordinating  Committee  (ASCC) , 
though  the  description  is  open  to  interpretation  (Air 
Standardization  Coordinating  Committee,  1982) .  It  requires  that 
shocks  be  grouped  by  DRI  values  into,  say,  Q  ranges  with  mean 
DRI  value  of  {DRl)q  where  q  =  \,2,3...Q .  Such  a  subdivision  has  been 
performed  in  figure  9  for  the  range  of  DRI  values  from  2  to  8. 

If  shocks  occur  in  the  range  {DRl)q ,  then  the  exposure  is 

considered  acceptable  by  the  ASCC  if: 
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(4.2) 


In  this  expression,  the  denominator  is  the  maximum  allowable 
DRI  corresponding  to  the  observed  number  of  shocks  during  a  24 

hour  period.  It  is  obtained  from  the  selected  criterion  curve  in 
figure  8,  against  which  the  exposure  is  being  assessed. 

The  form  of  the  discomfort  contours  in  figure  8  may  be 
expressed  as: 

log  (DRI^,,)  =  s  log  n^+b  (4.3a) 


where  b  and  s  represent  the  intercept  and  slope  of  the 
relationship.  As  each  discomfort  contour  possesses  the  same 

gradient  of  s  =  (Allen,  1977),  the  equation  can  be  rewritten 

as ; 

Different  values  of  the  constant  Ky  will  then  define  the  three 
equi-noxious  contours  shown  in  figure  8. 

The  same  equi-noxious  contour  may  also  be  expressed  in  terms 
of  the  maximum  number  of  shocks  defined  by  the  contour  for 
exposure  to  shocks  with  magnitude  in  the  range  defined  by  (DRI)^, 

namely  N^.  Hence: 

[(M/™ )  ..f",  =  K,=  [(M/),]V,  (4.4) 

or : 


» 


0 


mi). 


(4.5) 


Although  the  ASCC  criterion  for  human  tolerance  to  repeated 
shock  is  expressed  in  terms  of  the  DRI  magnitudes  (equation  4.2), 
it  should  be  noted  that  the  Palmgren-Miner  cycle-ratio  summation 
hypothesis,  on  which  the  ASCC  state  their  procedure  to  be  based, 
concerns  the  number  of  material  cycles,  or  in  this  case  number  of 
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shocks  (see,  for  example,  Shigley  and  Mitchell,  1983),  and  not 
the  stress  level.  The  hypothesis,  which  was  developed  to  account 
for  the  fatigue  of  metals,  is  commonly  expressed  as: 


(4.6) 


Implementation  of  this  equation  requires  counting  the  number 
of  shocks  that  fall  within  prescribed  ranges  of  DRI  values.  The 
number  is  then  compared  with  a  predetermined  maximum  allowable 
number,  for  each  DRI  range.  This  form  of  the  procedure  is 
preferred  for  machine  computation. 


If  the  Palmgren-Miner  cycle-ratio  summation  hypothesis  is 
employed  to  define  the  acceptability  of  exposures  expressed  in 
terms  of  the  DRI,  then  the  term  in  sqare  brackets  in  equation  4.2 
must  be  raised  to  the  power  8  (as  is  evident  from  equation  4.5) . 
The  criterion  of  acceptability  thus  becomes: 
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(4.7) 


No  evidence  to  support  this  change  in  the  index  of  the  DRI- 
ratio  summation  function  has  been  provided  by  the  ASCC.  It  is 
unclear  whether  the  ASCC  was  aware  of  the  inconsistency  between 
the  procedure  they  recommended  and  the  hypothesis  on  which  they 
state  it  to  be  based. 


It  should  also  be  noted  that  implementing  the  compliance 
criterion  by  grouping  DRI  values  inevitably  replaces  the  (smooth) 
functional  relation  between  shock  magnitude  and  number  by  a 
staircase,  as  shown  in  figure  9.  The  magnitude  of  the  steps,  and 
hence  the  deviation  from  the  original  relationship,  depends  on 
the  grouping  of  DRI  values,  which  in  turn  will  be  influenced  by 
the  number  and  magnitude  of  shocks  occurring. 


P.QSe  with  recovery  processes 

The  discussion  of  Sections  III  and  IV  has  provided  a 
conceptual  framework  with  which  to  construct  a  model  for 
quantifying  the  health  effects  resulting  from  exposure  to 
repeated  shocks  and  vibration.  While  it  would  be  undesirable  to 
finalize  the  dose  model  before  the  experimental  phase  of  the 
project,  it  is  appropriate  to  outline  the  form  of  model  that 
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would  appear  to  be  required.  The  following  discussion  must 
therefore  be  considered  to  be  exploratory  in  nature,  and, 
perhaps,  somewhat  speculative. 

The  underlying  physical  property  of  oscillatory  motion 
responsible  for  back  injury  or  pain  appears  to  be  related  to  the 
compressive,  and/or  bending,  strain  induced  in  the  spine.  A 
similar  property  may  well  also  represent  the  injury  potential  of 
most  organs  and  tissues.  It  is  unlikely  that  an  external  measure 
of  internal  strain  within  biological  systems  will  become 
commonplace,  though  a  method  for  measuring  spinal  motion  is  being 
explored  in  the  pilot  study.  In  consequence,  it  would  appear  at 
the  present  time  that  the  strains  will  have  to  be  estimated  from 
biodynamic  models.  A  one-dimensional  dose  model  could  therefore 
be  based  on  a  measure  of  strain  derived  from  a  one-degree-of- 
freedom  biodynamic  model.  In  these  circumstances,  the  strain  is 
related  to  the  net  compression  of  the  spring  of  the  model  (see 
figure  6) ,  and  may  be  expressed  in  terms  of  the  base  and  mass 
displacements . 

A  dose  function  for  exposure  to  repeated  shocks  is  implied 
by  figure  8,  in  which  the  tolerable  spinal  compression,  expressed 
by  the  magnitude  of  the  DRI,  is  related  to  the  maximum  daily 
number  of  impacts  (see  equation  4.4).  In  the  formalism  of 
Section  3.3,  this  dose  function  may  be  written  for  exposure  to 
Nq  shocks  of  the  same  magnitude,  from  equation  3.12,  as: 


*=i 


(4.8) 


In  this  equation,  the  dose  element  5,  represents  the  dose 
resulting  from  exposure  to  one  shock,  and  is,  in  consequence, 
obtained  by  selecting  a  time  interval  AT  that  includes  only  one 
shock.  Equation  4.8  may  also  be  written,  from  equation  3.11,  as: 


Cw 


(u)Y 


(4.9) 


The  term  in  curly  brackets  expresses,  in  general  form,  the 
higher-order  mean  value  of  the  time  series  during  this  time 
interval,  so  that  in  the  nomenclature  of  Section  I  (e.g.  equation 
1.13)  : 
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^W(RM)  - 


(4.10) 


Hence  the  dose  function  of  equation  4.8  may  be  written  when 
m  =  r  as: 


(4.11) 

Studies  of  the  fatigue  failure  of  human  bone  with  strain 
rates  reversing  approximately  once  per  second  suggest  that: 

Ni,aw(RM)  (4.12) 

if  aw{RM)  represents  the  strain.  The  relationship  was  found  to 
possess  a  value  of  r  of  between  5  and  6  for  from  100  to  10,000 
cycles  fo  uniaxial  compression  (Carter  et  al.,  1981).  This 
number  of  cycles  to  failure  is  consistent  with  the  anticipated 
range  in  the  total  number  of  shoclcs  occurring  during  a  day. 
Somewhat  higher  values  or  r  have  been  reported  for  the  failure 
of  bone  in  torsion  or  rotation,  and  also  of  femoral  articular 
cartilage  (Sandover,  1986) . 

There  would  therefore  appear  to  be  grounds  for  constructing 
a  dose  model  using  an  integrated  dose  function  compatible  with 
equation  4.12,  and  with  a  form  applicable  to  a  time  series  (e.g. 
equations  4.8  and  4.9).  For  this  purpose,  we  note  that  equation 
4.11  can  be  expressed  in  terms  of  the  total  time  of  exposure  to 
shocks  during  the  day,  7^(=NgAr): 

’  ^]m.r  ~  o!w(RM)  (4.13) 

For  shocks  equally  spaced  in  time  throughout  the  day,  we  can 
write : 


♦ 


Tq  =>7- 


(4.14) 


where  T  is  the  total  possible  exposure  time  during  the  workday. 

The  dose  model  is  then  constructed  using  an  expression  for 
the  strain  of  the  spine  with  an  appropriate  value  of  r,  such  as: 


i/. 


(4.15) 
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In  this  equation,  a^(u)  is  the  time  series  expressing  the  spring 
compression  derived  from  the  biodynamic  model. 
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By  employing  a  generalized  dose  function,  the  integrated 
effect  of  exposure  to  shocks  of  unequal  magnitude  and  shocks 
irregularly  spaced  throughout  the  day  will  be  calculated  using  a 
plausible  relationship  between  shock  magnitude  and  number.  A 
dose  function  of  this  form  may  be  formulated  to  represent 
exposure  to  random  vibration,  and  so  offers  the  potential  for 
constructing  an  integrated  dose  model. 


Biological  recovery  processes  may  be  introduced  into  the 
model  by  the  method  developed  in  Section  3.3.  Hence  the  one¬ 
dimensional  dose  model  suggested  by  this  argument,  expressed  in  a 
form  suitable  for  machine  computation  is,  from  equations  4.15  and 
3.18: 


where : 


C>iWJ] «  =  5«  +  (l-a)Dj_,[a„r-Ar]  „ 


(4.16) 


£  kM]* 

”  ii=(yv-i)ii+i 


(4.17) 
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Part  SlL  Analysis  vehicle  seat  shock  .and  ■Vi,dr,atl.,Qn  data 


V  Data  sources  and  processing 


In  order  to  characterize  and  simulate  the  vibration 
'  environment  experienced  by  military  personnel,  it  was  first 

necessary  to  obtain  reliable  seat  motion  data  for  a  wide  range  of 
vehicles  and  operating  conditions.  A  primary  requirement  was 
that  the  data  not  only  possess  a  range  of  continuous  (background) 
vibration  signatures,  but  that  they  also  contain  a  sufficient 
number  of  impact  signatures,  in  all  three  axis.  Statistics 
derived  from  these  data  could  then  be  used  to  construct  realistic 
experimental  test  signals  for  use  on  the  U.S.  Army  Aeromedical 
Laboratory  (USAARL)  multi-axis  ride  simulator  (MARS) . 

Data  were  supplied  to  British  Columbia  Research  Corporation 
(BCR)  from  two  main  sources .  The  first  source  was  the  Waterways 
Experimental  Station  (W.E.S.)  laboratory  located  near  Vicksburg, 
MS.  The  vibration  data  obtained  from  this  laboratory  were 
recorded  in  the  Z  direction  only,  and  therefore  provided  an 
incomplete  record  of  typical  operating  environments.  Because  of 
this  limitation,  a  request  was  made  by  BCR  for  data  that 
contained  simultaneous  vibration  information  in  the  X,  Y  and  Z 
directions.  The  staff  at  USAARL  made  contact  with  the  US  Army 
Aberdeen  Proving  Ground  in  Maryland,  and  were  provided  with 
three-axis  acceleration  data  from  a  range  of  TGVs .  All  data  had 
been  recorded  by  seat-pad  accelerometers  mounted  under  the 
buttocks,  that  is  between  the  buttocks  and  the  seat,  in  the  X,  Y 
and  Zdirections  specified  by  ISO  2631  (1985)  and  BS  6841  (1987). 
For  simplicity,  such  data  will  be  referred  to  as  seat  motion  data 
in  this  report. 

The  shock  and  vibration  data  were  analyzed  at  BCR.  Numerous 
programs  were  written  to  implement  the  analysis  routines  on  the 
Digital  Equipment  Corporation  VAX  4000-200  computer.  A  complete 
listing  of  these  programs  can  be  found  in  table  4.  References  to 
^  individual  programs  will  be  made,  as  appropriate,  throughout  the 
report . 
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5 . 1  Sources  q1 


5.1.1  Data  From  W.E.S.  Laboratories 

Vibration  data  from  two  different  vehicles  were  provided  to 
BCR  from  the  W.E.S.  laboratory.  Table  5  summarizes  the  vehicle 
types  and  their  operating  speed  ranges.  These  vehicles  were  run 
over  different  prepared  surfaces  (called  the  Letourneau  ride 
course),  which  have  varying  degrees  of  roughness.  The  Letourneau 
course  consists  of  seven  parallel  ride  surfaces  that  run  500  feet 
in  length  and  are  located  a  few  miles  from  the  W.E.S. 
laboratories.  They  are  kept  groomed  with  hard  gravel  and  are 
surveyed  regularly,  in  order  to  maintain  an  accurate  vertical 
surface  profile  for  consistent  ride  quality  tests.  Table  6 
defines  the  road  roughness  for  each  of  the  seven  courses  in  terms 
of  an  average  RMS  value  in  inches,  which  is  determined  after  "de¬ 
trending"  the  course  elevation  data  (for  further  explanation,  see 
Murphy,  1984) .  A  more  detailed  description  of  these  courses  can 
be  found  in  the  report  by  Gillespie  (1984) . 

Vertical  (Z  axis)  accelerations  were  recorded  on  a  TEAC  510 
instrumentation  tape  recorder.  Calibration  signals  were  also 
provided  on  each  tape.  The  data,  in  VHS  format,  were  supplied  to 
BCR  from  USAARL.  A  TEAC  510  recorder  provided  to  BCR  from  USAARL 
(not  the  same  machine  on  which  the  data  were  recorded)  was  used 
to  playback  the  acceleration  signals.  After  examination  of  the 
calibration  signals  provided  on  each  tape,  the  data  were  replayed 
to  the  VAX  4000-200  analog  to  digital  data  acquisition  system 
using  the  GEDAP  (General  Data  Acquisition  and  Processing) 
software  system  (Miles,  1990) .  Sampling  frequency  of  2000  Hz  was 
chosen  for  digitizing  the  signal,  to  ensure  that  impulsive 
waveforms  were  accurately  represented,  see  Griffin  (1990) . 

Analog  anti-aliasing  filters  with  a  cut-off  frequency  of  500  Hz 
were  used  (4-pole  Butterworth  type) .  A  description  of  the  data 
acquisition  system  is  to  be  found  in  Appendix  A. 

As  already  noted,  the  data  from  W.E.S.  contained  only  vertical 
acceleration  data,  which  provides  a  partial  picture  of  the  total 
vibration  environment  in  vehicles.  The  data  were  invaluable, 
however,  in  that  they  allowed  the  data  acquisition  and  analysis 
systems  developed  for  the  VAX  400-200  to  be  fully  exercised  and 
tested. 
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5.1.2  Data  From  Aberdeen  Proving  Grounds  Test  Facility 

Vibration  data  from  seven  military  vehicles  were  provided  from 
the  Aberdeen  Proving  Ground  Test  Facility.  Table  7  summarizes 
the  various  vehicle  types  and  operating  speed  ranges.  A  detailed 
description  of  these  vehicles  can  be  found  in  Appendix  B,  which 
contains  documents  supplied  by  USAARL. 

The  seven  vehicles  were  run  over  a  number  of  ride  courses  located 
at  the  Aberdeen  Proving  Grounds.  Each  vehicle  was  run  over 
courses  that  were  judged  to  be  representative  of  conditions  that 
would  be  encountered  in  an  operational  scenario.  The  courses  are 
listed  in  Table  8.  It  should  be  noted  that  not  all  vehicles  were 
run  over  every  course.  From  Table  8,  it  is  apparent  that  the 
vehicles  could  be  subjected  to  a  comprehensive  range  of  ride 
conditions.  Further  details  of  the  Aberdeen  courses  can  be  found 
in  a  report  (U.S.  Army  Aberdeen  Proving  Ground,  1981). 

Data  from  the  tests  performed  at  the  Aberdeen  Proving  Grounds 
were  supplied  to  BCR  in  the  form  of  pre-digitized  acceleration 
records  (in  units  of  g's  [gravity])  that  had  been  transcribed 
onto  Microsoft  DOS  format  3.5  inch  floppy  dis)cs  (numbering 
approximately  60  in  all) ,  together  with  transcripts  of  the  actual 
tests.  The  digitizing  process  was  not  under  the  control  of  BCR, 
but  it  is  assumed  that  the  data  were  recorded  according  to  normal 
procedures  (U.S.  Army  Aberdeen  Proving  Ground,  1970).  Different 
sample  rates  varying  from  approximately  400  to  600  Hz  were  used. 
These  rates  were  calculated  from  the  time  interval  between 
digitized  samples. 

Instead  of  having  to  playback  the  acceleration  records  through 
the  analog-to-digital  system,  as  was  done  with  the  W.E.S.  data, 
the  digitized  data  were  transferred  to  the  VAX  4000-200  system 
over  the  Ethernet  connection  from  a  personal  computer. 


Digital  processing  q1  signals 

Digital  processing  of  signals,  such  as  the  acceleration  waveforms 
of  seat  motion,  requires  the  (continuous)  time  record  to  be 
segmented  at  regular  intervals  to  form  a  time  series  as 
introduced  in  Section  3.3.  The  digitizing  process  results  in  a 
somewhat  different,  but  equivalent,  form  for  many  of  the 
equations  in  Part  A  of  the  report.  Key  equations  implemented 
during  computer  analysis  of  the  data  are  briefly  introduced  in 
this  subsection,  and  all  related  equations  employed  in  the 
analysis  of  data  are  listed  in  table  9. 


In  the  terminology  of  Section  3.3,  digital  data  acquisition 
occurs  at  time  intervals  5r,  and  the  signal  is  sampled  at  a 
frequency  of  =  Hz.  Using  the  nomenclature  of  Part  A  of  the 

report,  the  higher-order  mean  values  of  the  time  series  may  be 
written,  from  equation  4.10,  as: 


j  nN 

^W(RM)  -  '  X 


(5.1) 


The  root  mean  square  value  is  defined,  as  in  Section  I,  when 
m  =  r  =  2 ,  i.e. 
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Equation  5.2  should  be  compared  with  its  equivalent  formulation 
for  continuous  time  functions,  namely  equation  1.1.  Higher 
values  of  m  define  higher-order  mean  values,  which,  as  before, 
correspond  to  the  root  means  of  the  expected  values  of  continuous 
signals  (defined  by  equation  1.13).  For  example,  the  RMQ  value 
of  the  frequency  weighted  acceleration  time  series  becomes  (as 
m-4)  : 


f  1  4 1  ^ 


(5.3) 


The  dose  resulting  from  exposure  for  a  time  duration  of 
t=nNBt  to  a  time  series  with  mean  value  given  by  equation  5.1 
may  be  expressed,  by  analogy  with  equation  3.1,  as: 


f  <j'  nN 


(5.4) 


For  the  cases  m  =  r  =  2  and  m  =  r  =  4,  this  equation  yields  the 
RMS  and  RMQ  weighted  acceleration  vibration  doses,  which  are,  for 
a  time  series: 


(  T  , 
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(5.6) 
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Equations  5. 4-5. 6  may  be  compared  with  the  corresponding 
equations  for  continuous  functions,  equations  3.1,  3.3  and  3.4. 
The  last  two  equations  express  the  vibration  dose  in  a  form 
suitable  for  machine  computation.  As  already  noted,  equation  5.6 
is  known  as  the  vibration  dose  value  (VDV) . 

A  common  statistical  measure  of  an  amplitude  distribution, 
which  provides  some  information  on  the  deviation  of  the  shape  of 
a  probability  density  distribution  function  from  that  of  Gaussian 
distribution,  may  be  obtained  from  the  kurtosis  (Bendat  and 
Piersol,  1986),  which  is  defined  as: 

I  nN 

KURT  =  -—5 - XK 

«=1 

This  function  was  computed  during  data  analysis,  but  found 
little  use  during  interpretation  of  TGV  seat  motion,  as  it  was 
replaced  by  a  closely  related  measure  derived  from  the  higher- 
order  mean  values,  namely  the  ratio  of  the  RMQ  to  the  RMS 
frequency  weighted  accelerations. 


A  block  diagram  summarizing  the  measurement  and  analysis 
methodology  is  shown  in  figure  10.  The  processing  commences 
after  the  "digital  sampling"  block  for  the  Aberdeen  data  (i.e. 
the  data  are  pre-digitized) ,  whereas  it  starts  at  the  data 
"recorder"  block  for  the  W.E.S.  data  (which  are  in  analog  form). 


5.3.1  Frequency  Weighting  of  Data 

^  When  processing  data  containing  random  vibrations  in  order 

to  assess  human  comfort  or  health  effects,  it  is  normal  practise 
to  first  apply  a  frequency  weighting  function  to  the  raw  data. 
The  frequency  weighting  function  is  chosen  to  emulate  the 

»  response  of  the  body  to  the  various  frequencies  contained  within 
the  signal.  For  example,  it  is  known  that  humans  have  a  much 
higher  tolerance  of  high  frequency  accelerations  (40  -  80  Hz) 
than  of  lower  frequency  accelerations  (4-8  Hz)  of  the  same 
magnitude.  Thus,  a  waveform  of  4  Hz  which  was  perceived  as  a 
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"shock"  by  an  individual,  would  not  necessarily  represent  a 
"shock"  if  delivered  at  equal  magnitude  but  at  a  frequency  of  40 
Hz.  The  exact  nature  of  frequency  response  relationship  is 
disputed  and  various  weighting  functions  have  been  suggested  for 
random  vibrations  and  for  shocks. 

The  objective  of  this  phase  of  the  project  was  to 
characterise  whole  body  vibration  and  shocks  for  the  assessment 
of  human  health  effects.  Hence,  it  was  considered  appropriate  to 
frequency  weight  the  data  to  reflect  the  response  characteristics 
of  the  human  body.  This  was  necessary  in  order  to  avoid  higher 
frequencies  (e.g.  40  -  80  Hz  and  >  80  Hz)  from  dominating  the 
analysis  and  hence  distorting  the  characterisation  of  the  data  in 
terms  of  its  effects  on  humans,  (perception,  transmission  tissue 
damage  and  health  effects) .  One  of  the  objectives  of  Phases  3 
and  4  of  this  project  is  to  determine  the  appropriate  frequency 
weighting  functions  for  repetitive  shocks  delivered  in  the  x,  y 
and  z  directions.  As  these  weightings  were  not  available  during 
phase  2,  it  was  decided  that  the  raw  data  should  be  frequency 
weighted  using  the  existing  weighting  functions.  It  is  assumed 
that  although  these  may  not  be  accurate  in  defining  the  exact 
weighting  function  for  repetitive  shocks,  they  will  be  superior 
to  the  use  of  unweighted  data  in  representing  the  "type"  of 
waveform  transmitted  to  the  human. 

All  data  were  analyzed  with  respect  to  human  response  using  three 
different  methods.  The  first  method  employed  the  frequency 
weighting  in  the  ISO  standard  2631  (1985),  the  second  method 
employed  the  British  Standard  6841  (1987) ,  and  the  third  used  the 
Fairley-Griffin  biodynamic  model  to  frequency  weight  the  Z 
component  of  seat  motion  (Fairley  and  Griffin,  1989) .  The 
frequency  weightings  associated  with  ISO  2631  (1974,  1978,  1985) 
and  BS  6841  (1987)  are  shown  in  figures  4  and  5,  respectively, 
and  the  frequency  response  of  the  Fairley-Griffin  model  is 
indicated  in  figure  6.  A  discussion  of  these  frequency  weightings 
is  to  be  found  in  Section  II. 

The  time  series  data  were  frequency  weighted  by  transforming 
the  time  series  to  the  frequency  domain,  using  a  Fast  Fourier 
Transformation  (FFT)  routine,  and  then  applying  the  appropriate 
weighting  factor  to  each  frequency  component  (see  Section  II) .  An 
inverse  FFT  then  transformed  the  frequency  weighted  signal  back 
to  the  time  domain,  for  output  and  further  processing.  The 
transformations  were  accomplished  using  GEDAP  program  FILTV2  for 
both  the  ISO  and  British  standards,  and  program  BIODYN  to  process 
input  accelerations  according  to  the  Fairley-Griffin  model.  Note 
that  the  Fairley-Griffin  model  is  applicable  only  to 
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accelerations  in  the  vertical,  or  Z,  direction,  while  both  of  the 
standards  include  motion  in  all  three  directions:  X,  Y,  and  Z. 

A  FORTRAN  source  code  listing  for  these  and  other  analysis 
programs  written  for  specialized  applications  of  the  GEDAP  system 
is  to  be  found  in  Appendix  C.  As  already  noted,  a  summary  of 
these  programs  is  given  in  table  4.  The  specialized  applications 
implement  analysis  concepts  developed  in  Part  A  of  the  report. 

GEDAP  Program  CREST3  calculates  all  higher-order  statistics, 
up  to  the  twelfth-order  root  mean  value,  for  the  frequency 
weighted  acceleration  time  series  using  equation  5.1.  This 
program  also  calculates  the  higher-order  dose  values  (again  to 
order  12)  using  equation  5.4.  The  kurtosis,  a  measure  of  the 
deviation  of  a  distribution  from  that  of  a  Gaussian,  is 
calculated  using  equation  5.7. 

GEDAP  Program  STAT2  calculates  the  frequency  weighted 
acceleration  amplitude  probability  density  and  cumulative  density 
distributions  for  each  data  record.  This  program  is  a  GEDAP 
proprietary  program  and,  as  such,  source  code  cannot  be  printed. 
In  the  output  plots,  the  observed  probability  density 
distribution  is  compared  with  the  corresponding  Gaussian 
distribution,  based  on  the  calculated  mean  value  and  standard 
deviation . 

GEDAP  Program  IMPULSE,  using  input  from  the  probability 
density  distribution  (GEDAP  program  STAT2),  calculates  the 
impulsiveness  of  the  signal,  as  defined  in  equation  1.10. 

In  the  frequency  domain,  data  were  frequency  analyzed  using 
GEDAP  Program  VSD  (Variance  Spectral  Density) ,  after  frequency 
weighting  the  acceleration  signals  (using  either  GEDAP  Program 
FILTV2,  or  Program  BIODYN,  as  already  described) .  This  program 
is  also  a  GEDAP  proprietary  program  and  as  such  source  code 
cannot  be  printed,  though  information  is  provided  by  Miles 
(1990) .  The  spectral  density  data  were  then  summed  to  form  a  1/3 
octave-band  RMS  acceleration  spectrum  (using  GEDAP  Program  ISO) . 
Program  ISO  is  an  adaptation  of  a  program  supplied  to  BCR  by 
USAARL,  and  is  listed  in  Appendix  C. 

Plots  were  created  in  Postscript  format  using  the  GEDAP 
GPLOT  software  package  (Miles,  1990) .  Figure  11  shows  a  typical 
analyzed  record  of  the  seat  motion  in  TGVs.  At  the  top  of  the 
plot  is  displayed  the  time  series  of  the  frequency  weighted 
acceleration  at  the  seat -body  interface.  Immediately  below  the 
waveform  on  the  left  hand  side  is  a  graph  of  the  frequency 
weighted  seat  motion  after  it  has  been  transformed  to  the 


frequency  domain,  where  the  spectrum  is  plotted  as  the  RMS 
acceleration  in  each  1/3  octave  frequency  band.  The  next  graph 
below  is  the  probability  density  distribution  of  the  frequency 
weighted  acceleration,  plotted  as  a  function  of  instantaneous 
acceleration  magnitude.  To  the  right  is  a  table  listing  all  the 
statistical  and  other  parameters  derived  from  the  frequency 
weighted  acceleration  time  history  of  the  seat  motion.  The 
parameters  have  been  derived  or  defined,  as  appropriate,  in  Part 
A  of  this  report.  The  table  also  lists  the  location  of 
accelerometers,  direction  of  the  seat  motion,  frequency  weighting 
employed  in  the  analysis,  nature  of  the  ground  surface  and 
vehicle  speed. 

The  VAX  file  specification  identifies  the  data  file 
directory,  vehicle  type,  seating  location,  run  number  and 
direction  of  acceleration.  The  directory  name  (in  square 
brackets)  specifies  the  vehicle  and  the  location  of  the 
measurement  within  the  vehicle.  The  root  file  name  indicates  the 
run  number  while  the  file-type  indicates  the  direction  of 
acceleration,  i.e.  the  X  direction  corresponds  to  .001,  the  Y 
direction  to  .002  and  the  Z  direction  to  .003. 


5.3.2  Batch  Processing 

Batch  files  were  developed  to  automate  the  data  analysis  and 
graphing  processes.  The  batch  files  allow  many  different  GEDAP 
programs  to  be  run  in  an  orderly  sequence  while  operating  on  a 
given  data  set. 

The  VMS  data  directory  and  file  structure  used  are 
illustrated  by  the  following  example: 

From  the  Base  Directory: 

Sub-directory : 


Each  sub-directory  corresponds  to  the  location  where  the 
data  were  recorded.  The  individual  files  are  of  the  form: 
RUNOOl.OOl,  which  identifies  the  run  number  and  axis  direction 
(as  already  described)  for  that  particular  vehicle  and  location. 
Within  each  of  these  sub-directories  are  batch  files  that  control 
the  data  analysis  and  graphing  functions.  A  separate  batch 
command  file  is  used  for  each  vibration  direction.  Some  examples 
of  typical  batch  processing  command  files  are  given  in  Appendix 
C. 
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VI  Types  of  seat  motion 


The  motion  recorded  at  the  seats  of  the  TGVs  was  found  to 
possess  a  range  of  magnitudes,  frequency  content  and  temporal 
characteristics.  The  large  number  of  data  records  necessitated 
the  development  of  a  method  for  the  discrimination  of  impulses 
and  shocks  from  other  types  of  seat  motion,  by  computer.  The 
procedure  and  its  application  are  described  in  the  following 
subsections . 

The  different  waveforms  that  may  be  expected  to  occur,  and 
the  terminology  used  to  describe  them,  have  been  defined  in  the 
introduction,  and  are  shown  in  figure  1  (Griffin,  1990) . 


Classification  ^Lf  seat  motion  hn  computer 

Machine  recognition  of  different  waveform  characteristics  is 
accomplished  primarily  by  analyzing  the  acceleration  time 
histories  recorded  at  the  seatbody  interface,  with  a  separate 
measure  of  the  frequency  content.  The  basic  requirement  is  to 
separate  impulses  from  other  deterministic  (e.g.  sinusoidal)  or 
random  vibrations. 

Stationary  random  signals  were  first  identified  by  their 
statistical  properties  (see  Section  I) .  Reference  to  column  3  of 
table  1  shows  that  the  ratios  of  the  magnitudes  of  the  higher- 
order  root  mean  values  to  the  RMS  value  will  posses  known  values 
for  a  Gaussian  random  distribution.  For  example,  the  ratio  of 
the  RMT  to  the  RMS  value  will  be  2.16  (see  table  1),  for  seat 
motion  possessing  a  Gaussian  amplitude  distribution.  Deviations 
from  the  values  in  table  1  are  expected  to  occur  if  the 
acceleration  time  history  does  not  possess  a  Gaussian  amplitude 
distribution.  Accordingly,  seat  motion  may  be  considered  to  be 
(Gaussian)  random  in  nature  if  the  ratios  of  its  root  mean  values 
fall  within  a  limited  range  of  the  expected  values  listed  in 
table  1.  The  range  of  expected  values  for  which  a  waveform  will 
be  accepted  as  random  must  then  be  defined  in  order  to 
characterize  the  data.  For  convenience,  this  test  of  waveform 
amplitude  statistics  is  only  performed  for  one  higher-order  mean 
value,  and  is  implemented  using  the  ratio  of  the  twelfth-order 
root  mean  value  (RMT)  to  the  RMS  value,  i.e.: 

RMT  ^W(RUT)  ,  r  1  » 

- = -  (6.1) 

RMS  ^W(XMS) 


The  mathematical  expression  implemented,  by  computer,  for 
this  ratio  is  given  in  table  10.  The  root  mean  values  for  a  time 
series  are  defined  in  table  9,  and  equation  5.1. 

The  higher-order  mean  value  employed  for  this  test  of  seat 
motion  has  been  chosen  to  ensure  that  the  shape  of  the  vibration 
waveform  close  to  its  peak  excursions  strongly  influences  the 
magnitude  of  the  test  parameter.  Reference  to  table  1  shows  that 
the  RMT  acceleration  corresponds  to  the  97th  percentile  of  the 
amplitude  of  a  Gaussian  random  motion,  where  the  100th  percentile 
corresponds  to  the  (once  observed)  maximum  peak-to-peak  amplitude 
of  the  motion.  The  latter  was  not  considered  an  appropriate 
measure  to  employ  in  a  study  of  repeated  impacts. 

The  acceptable  range  of  RMT/RMS  about  its  expected  value,  in 
which  the  acceleration  time  series  is  considered  to  be  a  Gaussian 
random  vibration,  has  been  established  by  a  detailed  examination 
of  approximately  30  analyzed  records  of  the  seat  motion  in  TGVs, 
and  set  to: 


2.0  < 


RMT 

RMS 


<2.5 


(6.2) 


Values  of  RMT/RMS  are  to  be  found  in  all  analyzed  seat  motion 
records,  in  Appendixes  D  and  E. 

An  example  of  seat  motion  that  complies  with  the  requirement 
of  equation  6.2  is  shown  in  figure  11.  Reference  to  the 
statistics  ratios  listed  in  this  analyzed  seat  motion  record 
shows  that  the  computed  value  of  the  parameter  RMT/RMS  is  2.215 
for  the  weighted  acceleration  waveform  plotted  at  the  top  of  the 
diagram.  As  already  noted,  the  expected  value  of  this  ratio  for 
a  Gaussian  random  distribution  is  2.16.  This  discrepancy  is, 
however,  considered  to  be  insignificant.  Close  inspection  of  the 
acceleration  probability  density  distribution  plotted  in  the 
lower  left-hand  part  of  the  diagram  reveals  that  the  observed 
amplitude  distribution,  shown  by  the  vertical  bars,  is  almost 
indistinguishable  from  a  theoretical  Gaussian  distribution.  The 
latter  is  shown  by  the  dotted  line. 

It  is  instructive  to  examine  the  characteristics  of  the 
signal  shown  in  figure  11  in  some  detail.  The  waveform  can  be 
seen  to  contain  numerous  oscillations  with  different  frequencies 
and  amplitudes  (for  more  detail,  see  the  "stationary  random" 
signal  in  figure  1) .  It  might  appear  to  the  eye  that  the  higher 
frequency  oscillations  dominate  the  waveform,  but  there  is  little 
evidence  for  this  supposition  in  the  1/3  octave-band  frequency 
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spectrum.  While  the  random  nature  of  the  seat  motion  has  already 
been  confirmed,  this  property  does  not  exclude  the  existence  of 
large,  low-frequency  excursions  that  extend  from  almost  the 
minimum  to  maximum  acceleration  amplitudes  (see  the  oscillations 
around  12  s  from  the  start  of  the  record) .  This  comparatively 
large  pea)c-to-peak  acceleration  would  be  expected  to  induce 
significant  internal  body  strains,  perhaps  equivalent  to  an 
isolated  impulse  of  this  magnitude.  It  is  also  interesting  to 
note  that  the  crest  factor  of  this  seat  motion,  defined  in 
equation  1.2  and  listed  as  CREST  in  figure  11,  is  3.918.  This 
crest  factor  would  have  precluded  the  seat  motion  from 
interpretation  by  the  original  version  of  the  international 
standard,  which  required  the  crest  factor  to  be  less  than  3. 

This  situation  arises  even  though  the  amplitude  distribution  of 
the  motion  is  indistinguishable  from  that  of  a  Gaussian  random 
distribution!  Reference  to  the  summary  data  sheets  in  Appendixes 
D  and  E  reveals  that  nearly  all  Gaussian  random  seat  motions 
observed  in  TGVs  possess  crest  factors  in  excess  of  3,  providing 
ample  evidence  to  support  the  need  to  increase  the  crest  factor 
limit  in  the  original  standard. 

It  was  originally  believed  that  deterministic  signals  both 
periodic,  such  as  sinusoidal  motion,  and  non-periodic,  such  as 
transient  motion  and  shocks,  could  be  distinguished  from  each 
other,  and  from  random  motion  solely  on  the  basis  of  their 
acceleration  amplitude  probability  distributions  (for  examples  of 
these  signal  types,  see  figure  1) .  An  initial  attempt  was 
therefore  made  to  establish  different  signal  types  using  the 
magnitude  of  RMT/RMS.  Reference  to  figure  12  shows  that  the 
amplitude  probability  distribution  of  this  nearly  sinusoidal 
motion  (see  the  waveform  in  the  upper  part  of  the  seat  motion 
record)  differs  significantly  from  a  Gaussian  probability 
distribution.  As  in  the  preceding  diagram,  the  observed 
distribution  is  shown  by  the  vertical  bars,  and  a  Gaussian 
distribution  with  the  same  RMS  value  is  shown  by  the  dashed 
curve.  Reference  to  the  statistics  ratios  reveals  that  RMT/RMS 
is  1.344  for  this  waveform,  a  value  that  clearly  distinguishes 
this  seat  motion  from  Gaussian  random  vibration.  A  similar 
conclusion  may  be  drawn  by  examining  figure  13.  The  seat  motion 
in  this  record  possesses  a  value  of  RMT/RMS  of  1.738  and  a 
waveform  that  is  similarly  periodic  in  nature,  but  at  a  somewhat 
higher  frequency  (i.e.  4-5  Hz). 

At  first  sight,  figures  14  and  15  appear  to  confirm  that 
non-stationary  random  and  transient  deterministic  seat  motions 
may  be  distinguished  from  Gaussian  random  and  periodic  sinusoidal 
motions,  such  as  those  shown  in  figures  11-13,  on  the  basis  of 
the  magnitude  of  the  amplitude  probability  density  parameter. 


RMT/RMS.  The  value  of  this  parameter  is  3.244  for  the  waveform 

in  figure  14,  and  2.971  for  that  in  figure  15.  It  should  be 

noted  that  the  magnitude  of  RMT/RMS  now  exceeds  the  values  ^ 

associated  with  both  Gaussian  random  and  near-sinusoidal  periodic 

motions  (i.e.  RMT/RMS  >  2.5).  This  observation  applies 

irrespective  of  whether  the  intermittent  motion  is  essentially 

random  (figure  14)  or  tonal  (figure  15)  in  nature.  ^ 

Inspection  of  the  acceleration  amplitude  probability  density 
distributions  associated  with  these  motions  reveals  that  the 
distributions  in  figures  14  and  15  are  similar  in  form,  both 
exceeding  their  corresponding  Gaussian  distributions  for 
acceleration  amplitudes  close  to  zero.  The  excess  probability  of 
near-zero  motion  is  to  be  expected  for  signals  that  contain 
quiescent  periods.  In  addition,  there  is  also  a  small,  excess 
probability  of  large-amplitude  motion,  compared  with  that  of  a 
Gaussian  distribution  possessing  equal  RMS  value  (shown,  as 
before,  by  the  dotted  line) . 

It  is  possible,  however,  to  adjust  the  amplitude  variation, 
or  modulation,  of  a  tonal  signal  so  that  its  amplitude 
probability  distribution  approaches  that  of  a  Gaussian  random 
motion.  This  signal  property  can  be  seen,  qualitatively,  by 
comparing  figures  12  and  15.  The  former  contains  a  near-constant 
amplitude  sinusoidal  signal,  while  the  latter  contains  a  highly 
modulated,  or  transient,  sinusoidal  signal.  Reference  to  the 
acceleration  amplitude  probability  density  distributions  shows 
that  the  distribution  associated  with  the  near-constant  amplitude 
waveform  (figure  12)  lies  below  that  of  the  corresponding 
Gaussian  distribution  in  certain  well-defined  amplitude  regions 
(i.e.  near  the  maximum  excursions,  and  near  zero).  In  contrast, 
the  distribution  associated  with  the  highly  modulated,  transient 
sinusoid  (figure  15)  exceeds  that  of  its  corresponding  Gaussian 
distribution  in  exactly  these  amplitude  regions.  In  consequence, 
adding  these  two  signal  types  together  in  appropriate  quantities 
will  generate  a  signal  with  an  almost  Gaussian  amplitude 
probability  density  function. 

An  example  of  an  amplitude-modulated,  near-sinusoidal  seat  > 

motion  in  which  these  conditions  are  satisfied  is  shown  in  figure 
16.  It  can  be  seen  from  this  diagram  that  the  seat  motion 
waveform  consists  of  a  sinusoidal  signal  with  modulation  between 
that  of  the  waveforms  in  figures  12  and  15.  Inspection  of  the  « 

acceleration  amplitude  probability  density  distribution  for  the 
waveform  in  figure  16  reveals  that  it  is  close  to  that  of  a 
Gaussian.  Furthermore,  the  test  parameter  RMT/RMS  is  now  2.23, 
and  the  signal  would  be  incorrectly  classified  as  a  Gaussian 
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random  motion.  Clearly,  an  additional  test  is  required  for 
periodic  deterministic  signals. 

The  tonal  content  of  periodic  deterministic  signals  may  be 
derived  from  their  frequency  spectra.  A  simple  measure  of  the 
peak-to-mean  ratio  of  spectral  components  was  therefore  developed 
from  the  1/3  octave-band  spectrum,  which,  in  turn,  was 
constructed  from  the  Fourier  transform  of  the  time  series  records 
of  seat  motion  (see  Sections  II  and  V) .  A  test  parameter,  SPECF, 
was  hence  constructed  from  the  ratio  of  the  largest  acceleration 
component  in  the  1/3  octave-band  spectrum  to  the  mean  1/3  octave- 
band  spectral  level  of  all  frequency  bands,  viz: 


SPECF 


n 

k-\ 


(6.3) 


The  threshold  at  which  a  signal  is  considered  to  be 
dominated  by  deterministic  components,  that  is,  it  may  be 
characterized  as  primarily  tonal  (sinusoidal)  as  opposed  to 
Gaussian  random  seat  motion,  has,  again,  been  set  from  a  detailed 
examination  of  TGV  seat  motion,  to: 

SPECF  >4  (6.4) 

Reference  to  figures  12,  13,  15  and  16  reveals  that  the 
values  of  this  test  parameter  are  9.154,  5.451,  6.304  and  7.721, 
respectively,  demonstrating  that  these  predominantly  sinusoidal 
seat  motions  are  correctly  identified  by  this  test  parameter, 
irrespective  of  the  amount  of  amplitude  modulation.  In  contrast, 
the  values  of  SPECF  for  both  stationary  and  non-stationary  random 
seat  motion,  examples  of  which  are  shown  in  figures  11  and  14, 
can  be  seen  from  these  diagrams  to  be  3.373  and  3.463, 
respectively.  The  requirement  to  distinguish  the  transient 
deterministic  motion  of  figure  15  from  the  periodic  deterministic 
motions  of  figures  12,  13  and  16  reveals  the  need  for  multiple 
4  tests  of  waveform  characteristics,  since  the  transient  signal  is 
readily  identified  by  its  value  of  RMT/RMS.  Hence  it  would 
appear  that  both  stationary  and  non-stationary  random,  and 
periodic  and  transient,  signals  may  be  distinguished  by  combined 
^  tests  of  RMT/RMS  and  SPECF. 

While  the  discussion  of  non-stationary  and  transient  seat 
motion  has  identified  the  expected  increase  in  the  ratio  RMT/RMS 
above  that  for  a  Gaussian  distribution,  an  increase  in  the 
magnitude  of  this  parameter  is  also  expected  to  occur  with 
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shocks,  which  form  a  subset  of  transient  signals.  It  is  thus 
evident  that  shocks  cannot  be  distinguished  from  other  non¬ 
stationary  and  transient  signals  on  the  basis  of  the  magnitude  of 
the  ratio  RMT/RMS  alone,  although  shocks  will  be  distinguished 
from  Gaussian  random  and  periodic  deterministic  signals  by  the 
value  of  this  parameter.  Accordingly,  another  measure  of  the 
acceleration  amplitude  probability  density  distribution  must  be 
introduced . 

The  predominant  characteristic  of  an  impulse,  or  shock,  is 
that  its  peak  amplitude  is  sustained  for  an  extremely  small 
fraction  of  the  time  history  during  which  it  occurred.  A  direct 
measure  of  the  fraction  of  time  the  acceleration  waveform  exceeds 
a  pre-defined  magnitude  relative  to  its  maximum  value,  both 
positive  and  negative,  may  be  established  from  the  impulsiveness 
(see  Section  1.2.1).  This  parameter  retains  a  specific 
probability  value,  irrespective  of  characteristics  of  the 
waveform.  In  consequence,  the  parameter  was  introduced  to 
separate  impulses  from  other  non-stationary  random  and  transient 
deterministic  signals,  such  as  those  shown  in  figures  14  and  15. 

In  order  to  compute  the  impulsiveness,  it  is  first  necessary 
to  specify  the  probability  value  in  the  acceleration  amplitude 
cumulative  probability  distribution  at  which  the  parameter  is  to 
defined  (see,  for  example,  figure  2) .  Values  of  the 
impulsiveness  for  a  range  of  probability  values  are  listed  in  the 
seat  motion  data  analysis  records  (Appendixes  D) .  Reference  to 
table  1  shows  that  the  impulsiveness  defined  when  P(a)  =  0.91  will 
be  equal  to  the  magnitude  of  RMT/RMS  for  a  Gaussian  random 
signal.  Accordingly,  this  probability  value  was  chosen  for  the 
test  of  impulsiveness,  in  order  to  provide  a  parameter  that,  like 
RMT/RMS,  measured  a  signal  property  close  to  its  peak  amplitude 
and,  as  well,  to  provide  a  check  on  the  precision  of  the  signal 
processing  algorithms. 

Inspection  of  figure  17,  which  contains  several  impacts  of 
differing  magnitudes  and  shapes,  and  occasional  "small  bumps", 
shows  that  the  value  of  RMT/RMS  for  this  waveform  is  very  large 
(10.83),  while  the  value  of  impulsiveness,  1(0.97),  has  become 
small,  and  for  this  signal  equals  1.559.  The  values  of  the  two 
test  parameters  have,  as  expected,  clearly  diverged  for  this 
waveform,  thereby  providing  the  potential  for  identifying  the 
impulsive  signal.  A  similar  conclusion  may  be  drawn  for  the 
waveform  in  figure  18.  This  seat  motion  involves  one  shock  of 
greater  peak  amplitude  than  those  shown  in  figure  17,  several 
comparatively  "smaller"  shocks  and  numerous  "small  bumps".  The 
combination  of  these  events  and  the  broadband  background  seat 


motion  results  in  a  value  of  RMT/RMS  of  8.472,  and  1(0.97)  of 
2.088. 

^  The  ability  of  these  two  parameters  to  distinguish  between 

impulses  and  non-stationary  random  and  transient  deterministic 
signals  of  varying  amplitude  with  values  of  RMT/RMS  greater  than 
2.5  can  be  seen  by  comparing  figures  14  and  15,  with  figures  17 

H  and  18.  From  these  diagrams,  it  is  evident  that  the  intermittent 

seat  motions  (figures  14  and  15)  possess  an  impulsiveness  of 
2.902,  and  2.964,  respectively.  These  values  are  substantially 
greater  than  the  impulsiveness  observed  in  acceleration  time  his 
tories  containing  short-duration  impulses,  such  as  figures  17  and 
18.  Hence  for  nonstationary  random  and  transient  deterministic 
signals  with  acceleration  amplitude  probability  density  functions 
in  which  RMT/RMS  is  greater  than  2.5,  the  identification  of 
impulses,  which  include  shocks,  and  their  distinction  from 
intermittent  seat  motions  may  be  obtained  from  the  magnitude  of 
the  impulsiveness.  The  examination  of  approximately  30  analyzed 
records  of  the  seat  motion  in  TGVs  led  to  the  threshold  at  which 
impulses  occur  being  set  to: 

1(0.97)  =/(q57j<2.6  (6.5) 

As  has  already  been  noted,  the  highly-modulated,  perhaps 
transient,  sinusoidal  seat  motion  shown  in  figure  16  possesses  an 
acceleration  amplitude  probability  density  function  which  mimics 
that  of  a  Gaussian  random  signal.  Inspection  of  this  diagram 
reveals  that  this  motion  is  currently  classified  as  a  periodic 
deterministic  signal,  by  its  value  of  SPECF.  The  highly- 
modulated,  perhaps  transient,  nature  of  the  waveform  in  figure  16 
is  not  recognized  by  the  tests  for  RMT/RMS  and  SPECF.  Just  as 
the  waveform  shown  in  figure  16  compromised  the  performance  of 
the  test  for  distinguishing  it  from  a  Gaussian  random  signal,  it 
also  becomes  a  special  case  for  the  test  of  impulsiveness.  By 
again  examining  the  approximately  30  seat  motions,  a  second 
condition  for  testing  impulsiveness  has  been  derived  to  separate 
transient,  near-sinusoidal  seat  motion,  with  parameter  RMT/RMS  in 
the  range  2.0  <  RMT/RMS  <  2.5,  from  impulses  and  shocks.  Thus, 

■4  when  the  ratio  of  the  higher-order  mean  values,  RMT/RMS,  is 
between  2.0  and  2.5,  a  signal  may  possess  a  value  of 
impulsiveness  of: 

»  1(0.97)  >  2.3  (6.6) 

rather  than  2.6,  and  still  be  classified  a  transient  periodic  or 
non-stationary  random  signal.  Application  of  this  condition 
implicitly  requires  that  the  impulsiveness  of  a  Gaussian  random 
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distribution  be  less  than  2.3,  a  condition  that  can  be  seen  to  be 

satisfied  by  the  seat  motion  in  figure  11  (for  which  1(0.97) 

equals  2.169).  ^ 

The  impulsiveness  also  provides  a  further  test  for  seat 
motion  believed  to  consist  of  Gaussian  random  vibration,  for 
which  the  values  of  RMT/RMS  and  1(0.97)  should  be  equal. 

Reference  to  figure  11  demonstrates  the  extent  to  which  this  ^ 

condition  is  satisfied  in  practice.  It  can  be  seen  for  this 
waveform  that  the  values  of  RMT/RMS  and  1(0.97)  are  2.215  and 
2.169,  respectively.  It  should  be  noted  that  the  seat  motion 
shown  in  figure  11  is  as  close  to  Gaussian  random  motion  as  has 
been  observed  in  TGVs .  The  difference  between  the  magnitudes  of 
the  two  parameters  reflects  the  precision  with  which  each  can  be 
computed  by  the  signal  processing  software.  While  the 
discrepancy  was  acceptable  for  the  present  worlc,  it  reflects  the 
limitations  in  the  performance  of  the  present  algorithms. 

The  complete  set  of  conditions  used  for  machine  typing  of 
seat  motion  in  TGVs  based  on  values  computed  for  RMT/RMS,  1(0.97) 
and  SPECF  are  given  in  table  10.  It  is  evident  from  this  table 
that  the  signal  tests  have  been  combined  to  form  conditions 
requiring  alternate  values  of  the  test  parameters.  Using  these 
conditions,  the  seat  motions  of  TGVs  have  been  separated,  by 
computer,  into  four  types: 

Type  1  Gaussian  random  motion  (example  -  figure  11); 

Type  2  Periodic  deterministic  motion,  which  is  typically 

dominated  by  tonal  (narrow-band)  components  and  may 
be  amplitude  modulated  (examples  -  figures  12  and 
13)  ; 

Type  3  Intermittent  motion  -  non-stationary  random  and 

transient  deterministic  signals  (examples  -  figures 
14  and  15) ;  and 

Type  4  Impulsive  motion  including  shocJcs  (examples  - 

figures  17  and  18) .  t 

It  should  be  noted  that  the  four  types  of  signals,  while 
generally  distinct,  are  not  intrinsically  separated  by 

boundaries,  and  so  one  type  of  signal  will  gradually  change  in  ^ 

character  until  it  becomes  dominated  by  the  characteristics  of 
another  type  of  signal.  At  this  point  the  computer  will  change 
the  type  designation.  This  comment  is  particularly  relevant  to 
modulated  deterministic  signals  close  to  the  boundary  between 
type  2  and  type  3  signals,  or  type  3  and  type  4  signals.  An 
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example  of  seat  motion  close  to  the  boundary  between  type  2  and 
type  3  signals  is  shown  in  figure  16. 

The  ability  to  distinguish  between  signal  types  depends,  in 
part,  on  the  range  of  frequencies  contained  in  the  motion,  and  so 
will  be  least  precise  for  narrow-band  signals,  or  signals  whose 
frequency  content  has  been  reduced  by  "narrow-band"  frequency 
weighting.  This  last  observation  is  relevant  to  the  precision  of 
X  and  Y  seat  motion  typing,  as  the  frequency  weighting  imposes  a 
limited  range  of  frequencies  on  the  signal  (see  figures  4  and  5) . 
However,  as  discussed  in  Section  5.3,  while  the  unweighted  signal 
may  possess  different  characteristics  due  to  its  broader 
frequency  band,  these  characteristics  may  not  be  relevant  to  the 
human . 

In  summary,  signals  possessing  values  of  the  test  parameters 
close  to  the  limits  given  in  table  10  can  be  expected  to  show 
characteristics  of  more  than  one  type  of  motion.  The  computer 
will  select  which  of  the  characteristics  dominate,  according  to 
the  rules  provided.  The  limits  have  been  chosen  by  reference 
mainly  to  Z  axis  seat  motion,  and  are  therefore  expected  to 
perform  better  for  motion  in  this  direction.  Modification  of  the 
limits  for  the  X  and  Y  axes  may  well  improve  the  performance  of 
machine  typing  for  motion  in  these  directions. 


l^rification  Ol.  machine  typing  seat  motion 

The  accuracy  of  machine  typing  using  the  parameters  and  test 
values  listed  in  table  10  has  been  explored  for  160  records  of 
seat  motion  in  the  military  vehicles.  A  subjective  visual  typing 
of  the  motion  was  made  by  two  observers,  who  examined  each 
analyzed  data  record  in  sequence.  The  subjective  typing  was 
established  by  agreement  between  the  observers.  Although  there 
were  10  records  that  were  considered  borderline  between  signal 
types,  all  but  one  were  adjudicated  in  favour  of  the  typing 
performed  by  the  computer,  which  was  known  to  the  observers. 

One  record,  shown  in  figure  19,  was  considered  incorrectly 
typed  for  the  purposes  of  this  study.  The  computer  identified 
the  seat  motion  in  this  diagram  as  a  type  2  signal,  that  is,  a 
deterministic  tonal  signal  that  may  be  amplitude  modulated.  While 
at  first  sight  this  conclusion  may  be  considered  appropriate, 
close  inspection  of  the  waveform  between  13  and  17  s  from  the 
commencement  of  the  record  reveals  the  presence  of  large- 
amplitude  impulses.  The  dominance  of  the  tonal  character  of  the 
signal  has,  in  this  case,'  apparently  overcome  the  ability  of  the 
machine  typing  to  identify  the  shocks. 


Hence,  machine  typing  of  seat  motion  was  observed  to  be 
satisfactory  in  almost  all  cases  and,  at  worst,  resulted  in 
10/160  errors.  An  accuracy  of  at  least  90%  would  thus  appear  to 
be  achievable  by  the  method  described,  and  was  considered 
acceptable  for  the  purposes  of  the  present  study. 


Seat  motion  obs.er.v.ed  in  tactical  ground  vehicles 

A  Detailed  analysis  of  the  seat  motion  recorded  in  the  TGVs 
listed  in  tables  5  and  7,  presented  in  the  form  of  the  seat 
motion  records  in  figures  11  to  19,  is  to  be  found  in  appendixes 
D-1  to  D-23,  which  are  bound  separately.  These  appendices  con 
tain  analyses  for  all  recorded  seat  motion  after  frequency 
weighting  according  to:  (a)  British  standard  BS  6841  (1987)  (see 
Section  2.2);  (b)  ISO  standard  2631  (1985)  (see  Section  2.1); 

and,  for  motion  in  the  2  direction,  (c)  the  Fairley-Grif fin  bio 
dynamic  model  (see  Section  2.3).  The  analysis  employing  the  bio 
dynamic  model  computed  the  motion  of  the  model  mass,  i.e.  aw{.t)  in 
figure  6,  while  the  other  analyses  were  of  the  motion  at  the 
seat-buttocks  interface.  For  comparison,  the  unweighted  seat 
motion  was  also  analyzed  for  one  vehicle  (MlAl) . 


6.3.1  Influence  of  frequency  weighting 

The  influence  of  different  frequency  weightings  on  the  anal 
ysis  may  be  explored  by  a  comparison  of  seat  motion  records  for 
each  type  of  signal.  The  seat  motion  records  of  figures  11,  13, 
14  and  18  have  been  selected  for  this  purpose.  These  diagrams 
were  obtained  by  frequency  weighting  the  Z  direction  seat  motion 
according  to  the  provisions  of  the  British  standard  6841  (1987) . 
The  result  of  frequency  weighting  these  seat  motions  according  to 
the  international  standard,  ISO  2631  (1985),  and  using  the 
Fairley-Grif fin  biodynamic  model  are  shown  in  figures  20-23  and 
24-27,  respectively. 

The  dominant  effect  of  changing  from  the  frequency  weighting 
of  BS  6841  (a)  to  ISO  2631  (b)  and  then  to  Fairley-Grif fin  (c)  is 
to  reduce  the  high-frequency  content  of  the  signal.  This  change 
may  be  seen  most  clearly  by  comparing  the  relatively  flat 
frequency  spectrum  of  the  type  1  signal  in  figure  11,  with  the 
spectra  in  figures  20  and  24.  The  reduction  in  the  higher- 
frequency  spectral  components  in  figure  24  (frequency  weighted 
according  to  the  Fairley-Grif fin  biodynamic  model)  is  accompanied 
by  an  increase  in  the  spectral  components  around  4  Hz,  as  may  be 


inferred  by  comparing  frequency  weightings  (a)  and  (c) ,  shown  in 
figures  5  and  6. 

The  progressive  reduction  in  high  frequency  content  of  the 
seat  motion  with  change  in  frequency  weighting  may  be  clearly 
seen  in  the  waveforms.  The  waveform  in  figure  11  (frequency 
weighted  according  to  the  British  Standard)  appears  random  in 
nature,  with  the  only  identifiable  feature  being  two,  large- 
amplitude,  low-frequency  oscillations  approximately  12  s  after 
the  start  of  the  record,  as  previously  noted.  Inspection  of  the 
waveform  in  figure  20  (frequency  weighted  according  to  the 
International  Standard)  shows  that  these  two  oscillations  are 
more  visible,  as  are  similar  oscillations  approximately  8  s  after 
the  start  of  the  record.  The  dominant  feature  of  this  waveform 
is  now  an  impulse  1.5  s  after  the  commencement  of  the  record, 
which  is  not  seen  when  the  seat  motion  is  analyzed  using  the 
frequency  weighting  contained  in  the  British  Standard  (see  figure 
11).  This  low-frequency  impulse  becomes  more  dominant  when  the 
seat  motion  is  analyzed  using  the  Fairley-Grif fin  model  (see 
figure  24) .  It  should  be  noted  that  the  change  in  frequency 
weighting  also  affects  the  signal  typing.  Thus,  for  frequency 
weightings  (a)  and  (b)  the  signal  is  type  1;  while  for  (c)  the 
signal  is  designated  as  type  4,  that  is,  dominated  by  impulses. 

It  should  be  noted  that  the  waveform  in  figure  20  is  close  to  the 
boundary  between  type  1  and  type  4  signals.  This  observation 
provides  insight  into  the  threshold  at  which  impulses,  such  as 
that  occurring  1.5  s  after  the  commencement  of  the  record,  are 
detected  by  the  procedure  in  table  10. 

The  change  in  the  balance  of  spectral  components  between  low 
and  high  frequencies  is  also  evident  for  the  type  2,  3  and  4 
signals  (compare  figures  13,  21  and  25;  14,  22  and  26;  and  18,  23 
and  27,  respectively) .  The  reduction  in  the  high  frequency 
component  of  the  type  2  signal,  as  the  frequency  weighting  is 
changed  from  (a)  to  (c) ,  results  in  this  waveform  becoming 
progressively  more  sinusoidal.  This  change  in  waveform  is 
reflected  in  a  large  change  in  the  acceleration  amplitude 
probability  distribution  from  figure  13  to  25.  The  final 
distribution  (figure  25)  is  closer  to  that  associated  with  a  pure 
sine  wave.  Inspection  of  this  waveform  shows  that  the  amplitude 
modulation  in  this  seat  motion  becomes  more  evident  as  the  high- 
frequency  component  of  the  signal  is  reduced  (see  figure  25) . 

The  primary  change  in  the  type  3  signal  is  the  emergence  of 
large-amplitude,  low-frequency  oscillations  as  the  frequency 
weighting  is  changed  from  (a)  to  (c)  ,  in  a  manner  not  unli)ce  that 
observed  with  the  type  1  signal.  These  changes  are  most  evident 
by  comparing  the  waveforms  in  figures  14  and  26.  In  parallel 


with  this  waveform  change,  the  signal  type  also  changes  to  type 
4,  providing  another  indication  of  the  boundary  between  type  3 
and  type  4  signals. 

It  is  also  instructive  to  examine  the  modification  in  the 
waveform  that  occurs  with  change  in  frequency  weighting,  from  (a) 
to  (c) ,  for  the  type  4  signal  (figures  18,  23  and  27) .  The 
bipolar,  large-amplitude  impulses  in  the  waveform  of  figure  18 
(frequency  weighted  according  to  the  British  Standard) , 
corresponding  to  both  up  and  down  seat  motion,  become 
predominantly  unipolar  impulses  when  the  signal  is  frequency 
weighted  according  to  the  International  Standard  (see  figure  23) . 
The  rapid  changes  in  acceleration  are  somewhat  mitigated  when 
this  seat  motion  is  analyzed  using  the  frequency  weighting  of  the 
Fairley-Grif fin  biodynamic  model  (see  figure  27) .  However,  the 
impulsive  nature  of  the  waveform  remains,  with  the  dominant 
impulse,  which  occurs  21  s  after  the  commencement  of  the  record, 
significantly  increased  in  pea)c  acceleration,  from  37.7  to  46.1 
m  s~^ .  Inspection  of  other  amplitude  measures  in  figure  27 
reveals,  perhaps  paradoxically,  that  while  the  impulsiveness  has 
remained  virtually  unchanged  from  that  calculated  for  the 
waveform  in  figure  18,  most  measures  of  the  "pea)cedness"  of  the 
signal  have  decreased.  For  example,  the  crest  factor  has 
decreased  from  11.43  to  6.66,  to  reflect  the  relative  increase  in 
magnitude  of  the  more-continuous,  lower-frequency  oscillations. 
The  latter  component  of  the  waveform  will  ultimately  affect  the 
signal  type,  though  the  waveform  remains  clearly  dominated  by  the 
impulses . 

From  this  discussion  of  different  frequency  weightings  for 
the  Z  direction,  there  seems  to  be  little  reason  to  choose  one  in 
preference  to  another,  and  less  reason  to  attempt  to  summarize 
seat  motion  according  to  each  frequency  weighting.  This 
observation  will  also  apply  to  the  X  and  Y  directions,  for  which 
there  is  little  difference  between  the  frequency  weightings 
contained  in  the  British  and  International  Standards  other  than 
the  specification  of  phase  in  the  former.  Moreover,  the  emphasis 
in  this  Section  is  on  characterizing  the  complete  motion,  rather 
than  on  describing  solely  waveform  shapes.  It  should  be  noted 
that  all  frequency  weightings  discussed  are  believed  to  represent 
equi-noxious  contours  for  some  human  responses  to  vibration. 
Accordingly,  a  summary  of  data  analyzed  according  to  one 
frequency  weighting  has  been  performed.  The  analysis  employed 
the  frequency  weightings  specified  by  the  British  standard  BS 
6841  (1987) ,  as  these  have  already  been  specified  for  the 
revision  of  the  International  Standard. 


6.3.2 


Summary  of  data 


A  summary  of  all  seat-motion  data,  frequency  weighted 
according  to  the  British  Standard,  is  tabulated  in  Appendix  D  of 
this  report.  The  seat  motion  data  recorded  during  cross-country 
operations  are  also  summarized  separately,  in  Appendix  E. 

The  ability  to  reduce  the  large  amount  of  data  to  basically 
impulses  (including  shocks)  and  three  types  of  vibration  - 
stationary  random,  tonal  with  or  without  amplitude  modulation, 
and  transient  periodic  or  non-stationary  random  motions  -  is 
indicative  of  the  similarities  in,  and  differences  between,  the 
seat  motion  recorded  in  the  TGVs.  As  the  impulses  and  shocks  are 
a  primary  interest  of  this  study,  this  type  of  motion  is  examined 
separately,  in  Section  VII. 

Reference  to  table  11  (M2HS  Bradley) ,  which  is  one  of  the 
summary  tables  in  Appendix  D,  shows  that  each  contains  a  heading 
that  identifies  the  vehicle,  the  location  and  direction  of  the 
seat  motion,  the  frequency  weighting  employed,  and  the  date  of 
the  analysis.  A  listing  of  the  file  identification  is  given  in 
the  first  column  of  the  table,  to  enable  the  original  analyzed 
seat  motion  data  record  to  be  located  in  the  separately  bound 
volumes  (Appendixes  D-1  to  D-23) .  The  signal  type  is  given  in 
the  second  column.  This  has  been  determined,  by  computer,  using 
the  method  described  in  the  preceding  subsections.  The  typing 
has  been  performed  with  the  values  of  the  three  parameters 
RMT/RMS,  1(0.97)  and  SPECF  computed  for  each  data  record,  which 
are  listed  in  columns  3-5.  The  course  over  which  the  seat  motion 
was  recorded  is  given  in  column  6,  and  the  vehicle  speed  in 
column  7 . 

The  various  measures  of  the  magnitude  of  the  motion  and  the 
consequent  vibration  doses  are  listed  in  the  remaining  columns  of 
the  table.  Columns  8  to  10  provide  measures  of  the  peak 
amplitudes  of  the  waveform  recorded  during  the  analysis  time 
window,  namely  that  of  the  acceleration  time  history  shown  in  the 
corresponding  data  record.  Only  three  of  the  possible  six 
higher-order  mean  and  dose  values  are  listed  in  the  table, 
because  of  space  limitations.  The  three  mean  and  dose  values 
chosen  for  inclusion  in  the  tables,  in  columns  11-13  and  14-16, 
respectively,  are  those  believed  to  be  most  relevant  to  the 
objectives  of  this  study.  All  higher-order  mean  and  dose  values 
are,  of  course,  reported  in  the  analyzed  seat  motion  data 
records,  as  may  be  seen  from  an  examination  of,  for  example, 
figures  11  to  18.  It  should  be  noted  that  re-analysis  of  data 
from  the  same  record  may  lead  to  somewhat  different  values  of  the 
measured  parameters,  particularly  for  transient  and  nonstationary 


seat  motions,  owing  to  the  difficulty  of  precisely  re-aligning 
the  time  window. 

From  the  summary  of  data  in  table  11,  it  can  be  seen  that 
all  four  types  of  seat  motion  occurred  during  operation  of  this 
vehicle  over  gravel,  washboard,  paved,  soil  and  cross-country 
courses.  A  distillation  of  these  results  by  seat  motion  type  is 
contained  at  the  bottom  of  the  table.  For  the  mix  of  rides 
shown,  approximately  one  quarter  experienced  in  the  Z  direction 
by  the  commander  of  this  M2HS  Bradley  were  classified  as  Gaussian 
random  (type  1)  motion,  approximately  one  half  as  near-sinusoidal 
deterministic  (type  2)  motion,  and  one  sixth  as  containing 
impulses  (type  4  motion) ,  some  of  which  will  be  of  sufficient 
magnitude  to  constitute  shocks  (see  Section  7) . 

Mean  values  and  standard  deviations  have  been  calculated  for 
all  the  parameters  given  in  the  table.  They  are  included  to 
assist  the  reader  to:  a)  identify  trends  between  the  three 
vibration  components  of  seat  motion;  b)  compare  the  seat  motions 
experienced  by  different  occupants  of  a  vehicle  experiencing  the 
same  ride;  and  c)  gain  an  impression  of  variations  in  seat  motion 
from  vehicle  to  vehicle.  It  should  be  noted  that  forming  overall 
mean  values  for  some  of  the  parameters  tabulated  has  little 
meaning  in  terms  of  the  mean  magnitude  that  results.  For 
example,  the  so-called  "mean  value"  for  type  4  signals  provides 
little  information  regarding  the  probable  amplitude  of  shocks  to 
expect  within  the  vehicle.  An  alternative  method  for  describing 
shocks  will  be  developed  in  the  next  Section. 

It  is  appropriate,  however,  to  examine  the  mean  values  of 
stationary  random  and  periodic  deterministic  signals  recorded  at 
the  seats  of  different  vehicles  (signal  types  1  and  2) .  A 
summary  of  the  mean  values  of  types  1  and  2  signals  are  presented 
in  tables  12  and  13,  respectively,  for  the  analyses  performed 
using  the  frequency  weightings  specified  by  the  British  Standard. 
The  results  provide  a  basis  for  establishing  typical  values  for 
these  types  of  seat  motion  in  TGVs,  for  use  in  the  pilot 
laboratory  experiments. 

Reference  to  tables  12  and  13  confirms  that  the  largest 
amplitude  type  1  or  type  2  seat  motion  occurred  in  the  Z 
direction.  For  Gaussian  random  motion,  the  mean  RMS  acceleration 
observed  in  this  direction  ranged  from  0.11  to  2.53  m  s~^ .  In 
contrast,  the  mean  RMS  acceleration  of  periodic  deterministic 
motion  in  the  Z  direction  at  the  seats  of  these  vehicles  ranged 
from  0.15  to  3.14 


The  ranges  of  mean  RMS  accelerations  observed  in  the  X 
direction  for  the  type  1  and  type  2  seat  motions  of  the  TGVs  were 
from  0.08  to  0.69  ms~^,  and  from  0.11  to  2.01  m-s~^ , 
respectively.  The  corresponding  ranges  of  mean  RMS  accelerations 
observed  in  the  Y  direction  for  the  type  1  and  type  2  seat 
motions  were  from  0.09  to  0.57  m-5”^and  from  0.08  to  0.60  m-s~^ , 
respectively . 
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VII  Shocks  and  repeated  impacts 


Impulsive  motion  was  observed  at  the  seats  of  all  vehicles. 
The  X,  Y  and  Z  directions  of  seat  motion,  however,  often 
displayed  different  waveforms  in  response  to  the  same  input  to 
the  vehicle.  A  typical  variation  in  the  components  of  seat 
motion  during  cross-  country  operation  can  be  seen  from  figures 
28,  29  and  18,  where  the  difference  in  scale  of  the  ordinate  of 
the  waveform  should  be  noted.  These  seat  motion  records  for  the 
X,  Y  and  Z  direction,  respectively,  resulted  when  the  MlAl  was 
driven  at  20  m.p.h.  over  rough  loam. 

Inspection  of  the  time  histories  of  the  motion  in  these 
records  shows  that  the  extremely  large  impulse  in  the  Z  direction 
(figure  18)  21  s  after  the  commencement  of  the  record  is  mimicked 
in  the  X  direction  (figure  28) .  In  the  latter  record,  a  similar 
shaped  impulse  of  approximately  one-third  the  magnitude  of  that 
the  Z  direction  is  observed.  However,  the  seat  motion  at  this 
time  in  the  Y  direction  is  of  much  smaller  amplitude  and  very 
different , character  (figure  29).  Indeed,  while  there  are  clear 
similarities  in  the  seat-motion  waveforms  for  the  X  and  Z 
directions,  it  is  difficult  to  reconcile  these  features  with 
those  dominating  the  Y  component  of  the  motion.  Thus  it  would 
appear  that  this  input  to  the  vehicle  resulted  in  the  driver 
experiencing  large  up-and-down  and  fore-and-aft  motions.  A 
combination  of  these  motions  may  be  suspected  to  play  a 
significant  role  in  the  development  of  back  injuries. 

The  extent  to  which  the  frequency  weighting  has  influenced 
the  shape  and  magnitude  of  the  impulse  waveform  can  be  seen,  for 
the  Z  direction,  from  figure  30.  This  record  has  been  analyzed 
without  any  frequency  weighting  for  the  same  seat  motion  of  the 
MlAl ' s  driver .  It  can  be  seen  by  comparison  with  figure  18, 
which  is  the  same  motion  after  frequency  weighting  according  to 
the  British  standard_ 6841  (1987),  that  the  main  effect  of  this 
frequency  weighting  is  to  reduce  the  peak  amplitudes  by 
approximately  one  third,  and  to  introduce  a  bipolar  nature  to  the 
initially  unipolar  impulses.  While  the  change  in  magnitude  of 
the  impulse  is  due  to  the  magnitude  (or  modulus)  of  the  frequency 
weighting,  shown  in  figure  5,  the  change  in  shape  is  due 
primarily  to  changes  introduced  in  the  relative  phase  between 
spectral  components,  at  different  frequencies.  This  deduction 
may  be  confirmed  by  comparing  the  unweighted  waveform  for  this 
vehicle  impact  (figure  30)  with  that  observed  after  frequency 
weighting  using  the  International  Standard  (figure  23) .  The 
latter  has  been  constructed  assuming  that  there  are  no  phase 


shifts  introduced  by  this  frequency  weighting.  It  should  be 
noted  that  the  signal  processing  methods  employed  in  the  present 
study  permitted  such  a  frequency  weighting  to  be  created  in 
software.  A  phase-shift  free,  analog  filter  would,  however,  be 
virtually  impossible  to  construct  physically. 

A  detailed  analysis  of  seat  motion  records  containing 
4  impulses  was  thus  undertaken  without  frequency  weighting  and  is 

described  below  in  sections  7.1  to  7.3. 


2^  ^QCk  definition 

It  is  evident  from  the  discussion  of  Section  VI  that  machine 
typing  can  generally  identify  seat  motions  containing  impulses. 
The  focus  of  the  analysis  presented  in  that  Section  was  on 
measures  with  which  to  characterize  the  complete  motion.  In 
contrast,  the  focus  in  this  Section  is  on  measures  with  which  to 
characterize  individual  shocks. 

The  classification  of  an  impulse  as  a  shock  requires  that 
there  be  at  least  a  working  definition  of  the  latter.  The 
definition  adopted  for  the  present  study  is  summarized  in  figure 
31 . ^  To  be  considered  a  shock  as  opposed  to  another  form  of  non¬ 
periodic,  deterministic  signal,  the  motion  must  be  more  than  1.0 
g's  in  peak  amplitude,  possess  a  fundamental  frequency  between 
0.6  and  60  Hz,  and  be  separated  in  time  from  an  adjacent  event  by 
at  least  0.25  s. 

Several  types  of  shock  waveforms  have  been  defined.  The 
descriptions  are  based  on  the  shape  of  the  waveform.  As  one 
purpose  of  shock  characterization  is  to  identify  waveforms  for 
use  in  shock  simulations,  the  definition  employs  waveforms  that 
may  be  generated  by  equation  1.20.  For  simplicity  in  shock 
simulation,  this  equation  is  implemented  using  the  lowest 
frequency  (fundamental)  term,  which  results  in  waveforms  that  are 
damped  sinusoids.  The  type  of  shock  is  then  defined  by  the 
polarity  of  the  initial  motion,  and  the  number  of  oscillations  in 
the  direction  of  the  initial  motion. 

Schematic  representations  of  types  +1,  +2,  -1,  and  -2  shocks 
are  shown  in  figure  31.  Higher-order  shocks  (types  +3,  -3,  etc.) 
are  defined  in  an  identical  manner. 
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2^2  Shocks  observed  in  tactical  ground  vehiclgs 


The  impulses  detected  in  the  seat  motion  of  TGVs  have  been  > 

analyzed  in  two  ways.  Firstly,  shocks  were  selected  during 
vehicle  usage  over  all  available  ground  surfaces  and,  secondly, 
shocks  occurring  during  cross-country  operations  were  selected 
from  the  records  of  all  vehicles.  Details  of  all  shocks  analyzed  ^ 

are  to  be  found  in  Appendix  F. 

The  process  of  analysis  was  the  same  for  all  records  of  seat 
motion,  and  is  exemplified  by  figures  32-34,  and  table  14.  The 
last  mentioned  is  one  of  the  shock  waveform  analysis  tables  in 
Appendix  F.  The  first  four  columns  of  this  table  identify  the 
vehicle  (M2HS) ,  the  location  of  the  seat -pad  accelerometers 
(Commander's  seat),  the  record  (number  23),  and  the  direction  of 
seat  motion  (Z) . 

Reference  to  table  11  shows  that  there  were  four  records 
during  which  the  commander  of  this  M2HS  Bradley  experienced  type 
4  motion  in  the  Z  direction  -  records  22,  23,  40  and  44.  Of 
these,  records  23  and  44  were  selected  for  the  general  analysis, 
and  record  23  for  the  cross-country  analysis.  By  coincidence, 
both  of  these  seat  motions  were  recorded  during  cross-country 
operation  of  the  vehicle. 

A  frequency  unweighted  waveform  of  the  complete  record 
selected  was  first  obtained.  The  unweighted  acceleration 
waveform  for  record  23  is  shown  in  figure  32.  This  waveform  can 
be  seen  to  consist  of  both  large-  and  small-amplitude  impulses, 
within  a  background  of  continuous  vibration.  The  identification 
of  shocks  within  this  record  of  seat  motion  requires  application 
of  the  definition  contained  in  figure  31. 

Inspection  of  figure  32  reveals  that  establishing  the  number 
of  shocks  occurring  during  seat  motion  is  not  clear  cut,  owing  to 
the  amplitude  fluctuations  in  the  waveform.  The  number  of  shocks 
in  this  and  all  other  shock  waveform  records  was  established 
subjectively  by  observation,  and  required  the  agreement  of  two 
observers.  It  this  way,  it  was  judged  that  9  shocks  occurred 
during  the  time  history  shown  in  figure  32.  This  information  has 
been  recorded  in  column  6  of  table  14.  The  maximum  and  minimum 
times  between  these  shocks  may  similarly  be  estimated  by 
observation,  and  is  recorded  in  column  7  and  8  of  the  table.  Of  ^ 

these  shocks,  the  five  most  easily  recognizable  were  selected  for 
detailed  examination.  These  events  occurred  approximately  2.5, 

6,  10,  13  and  17  s  from  the  commencement  of  the  record.  Shock 
parameters  for  each  of  these  events  are  listed  in  separate  rows 
of  table  14  (see  rows  1-5) . 
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The  analysis  then  proceeded  by  examining  a  detailed  record 
of  each  event.  The  fourth  and  fifth  events  in  figure  32  are 
«  plotted  using  an  expanded  time  scale  in  figures  33  and  34, 

respectively,  for  this  purpose.  With  the  additional  time 
resolution,  the  two  events  can  be  seen  to  consist  essentially  of 
a  short-duration  unipolar  impulse  followed  by  a  lower-frequency 
decaying  sinusoid,  all  immersed  in  a  tonal  background  with  a 

*  frequency  in  excess  of  50  Hz.  By  comparing  the  waveform  detail 
in  figure  33  with  the  total  waveform  in  figure  32,  this  shock 
complex  was  designated  a  +3  type  shock,  with  a  peak  positive 
(upward)  acceleration  estimated  to  be  +2.0  g's,  and  a  peak 
negative  acceleration  estimated  to  be  -1.3  g's.  The  mean 
frequency  during  this  event  is  1.6  Hz.  This  information  is 
recorded  in  columns  9-12  of  table  14  (row  4) . 

A  similar  examination  may  be  made  of  the  fifth  event  in  this 
seat  motion,  by  comparing  the  waveform  detail  (figure  34)  with 
the  overall  waveform  (figure  32) .  From  these  diagrams,  it  is 
evident  that  the  fifth  event  consists  of  a  type  +1  shock,  with 
peak  positive  acceleration  estimated  to  be  3.2  g's,  peak  negative 
acceleration  estimated  to  be  -1.0  g's,  and  a  mean  frequency  of 
1.8  Hz. 

In  this  way,  a  listing  of  the  shock  types  and  parameters  of 
easily  recognizable  events  that  occurred  during  a  single  seat 
motion  data  record  is  obtained.  This  process  is  then  repeated: 
a)  for  different  data  records;  b)  for  different  seats  in  the  same 
vehicle;  and  c)  for  different  TGVs.  Appendix  F  contains  details 
of  49  shocks  observed  during  operation  over  all  ground  surfaces, 
and  over  50  shocks  observed  during  cross-country  operations. 

Since  the  latter  are  a  subset  of  the  former,  a  cross-country  seat 
motion  record  may  appear  in  both  listings. 

A  summary  of  the  important  parameters  of  shock  data  from 
Appendix  F  is  contained  in  tables  15-20.  The  compilation  of 
shocks  during  vehicle  usage  over  all  surfaces  is  given  for  each 
direction  of  motion  in  tables  15-17,  and  during  cross-country 
operations  in  tables  18-20.  From  an  examination  of  these  tables, 

*  it  can  be  seen  that  most  shocks  occurred  in  the  Z  direction.  The 
comparatively  few  shocks  in  the  X  direction  during  cross-country 
operation  is  a  consequence  of  the  shock  definition  employed, 
which  excluded  impulses  with  magnitudes  of  less  than  1.0  g's. 

Reference  to  these  tables  shows  that  the  most  commonly 
observed  shock  in  the  Z  direction  during  cross-country  operation 
of  TGVs  was  a  type  +2  shock  (table  20) .  The  maximum  (peak) 
positive  acceleration  observed  in  this  type  of  shock  was  6.5  g's, 
and  the  maximum  (peak)  negative  acceleration  was  -2.0  g's.  The 
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fundamental  frequency  of  the  shock  waveform  was  in  the  range  of 
from  0.95  to  6.0  Hz,  and  there  were  a  minimum  of  three  such 
shocks  a  minute,  and  a  maximum  of  eight  per  minute.  This 
analysis  is  based  on  an  examination  of  30  shock  waveforms. 

The  most  commonly  observed  shock  in  the  X  direction  during 
cross-country  operation  of  TGVs  can  be  seen  from  table  18  to  have 
been  a  type  +1  shock,  with  a  maximum  (peak)  positive  acceleration 
of  3.7  g's,  and  maximum  (peak)  negative  acceleration  of  -3.0  g's. 
The  fundamental  frequency  of  the  shock  waveform  ranged  from  1.0 
to  60  Hz,  and  there  were  a  minimum  of  20  such  shocks  a  minute, 
and  a  maximum  of  60  per  minute.  The  analysis  is  based  on  an 
examination  of  10  shock  waveforms. 

Similarly,  the  most  commonly  observed  shock  in  the  Y 
direction  during  cross-country  operation  of  TGVs  can  be  seen  from 
table  19  to  have  been  a  type  +1  shock,  with  a  maximum  (peak) 
positive  acceleration  of  2.7  g's,  and  maximum  (peak)  negative 
acceleration  of  -1.4  g's.  The  fundamental  frequency  of  the  shock 
waveform  ranged  from  0.8  to  40  Hz,  and  there  were  a  minimum  of  11 
such  shocks  a  minute,  and  a  maximum  of  29  per  minute.  This 
analysis  is  based  on  an  examination  of  18  shock  waveforms. 

Corresponding  summaries  of  the  most  commonly  observed  shocks 
when  the  TGVs  were  operated  over  all  available  ground  surfaces 
may  be  derived  from  tables  15-17. 


7^  Repetitive  .shpciis  and  impacts 

The  definition  of  shock  requires  each  event  to  be  separated 
in  time  by  at  least  0.25  s.  Repeated  shocks,  or  impacts,  may 
hence  occur  at  a  rate  of  up  to  four  a  second.  An  example  of 
repeated  impacts  recorded  at  the  driver's  seat  of  the  M109A3  is 
shown  in  figure  35,  where  it  can  be  seen  that  few  of  the  peak 
accelerations  exceeded  1.0  g's.  Such  repeated  impacts  are 
included  in  the  shock  analysis  when  each  impact  is  of  sufficient 
magnitude.  It  should  be  noted  that  repeated  impacts  of  the  type 
shown  in  figure  35  were  infrequently  observed  during  cross¬ 
country  operation  of  TGVs. 

Reference  to  the  seat  motion  in  figure  19  shows  that 
repeated  large-amplitude  oscillations,  which  may  well  be 
subjectively  assessed  as  repeated  impacts,  have  also  been 
observed.  These  apparently  deterministic  motions  were  not 
included  in  the  shock  analysis  when  identified  as  type  2  seat 
motions,  and  tend  to  occur  when  vehicles  operate  on  washboard,  or 


other  regularly-profiled  prepared  surfaces.  Such  motions  may  be 
simulated  by  frequency-band  limited  square  waves. 

Shocks  similar  to  those  between  13  and  17  s  from  the 
commencement  of  the  record  in  figure  19  have,  of  course,  been 
included  in  the  shock  analysis  when  the  ratio  RMT/RMS  for  the 
motion  exceeds  2.5.  The  value  of  this  parameter  in  the  seat 
motion  of  figure  19  was  2.334. 


PART  C:  Vibration  .and  sh.QcK  simulntion 


VIII  Signal  generation 


Shock  and  vibration  simulation 

It  would  appear  from  the  field  data  reported  in  Part  B  that 
the  shock  and  vibration  environment  in  TGVs  may  be  considered  to 
consist  of  a  background  vibration  interspersed  with  various  types 
of  shock  waveforms.  Examples  of  seat  motion  exhibiting  this 
combination  of  signals  are  to  be  found  in  figures  17,  18,  30,  and 
32-35.  These  waveforms  were  all  observed  during  cross-country 
operations,  there  being  fewer  shocks  recorded  when  the  vehicles 
were  operated  on  roads. 

Appropriate  values  of  the  shock  parameters  for  use  in  shock 
simulation  may  be  established  by  reference  to  tables  18-20.  An 
appropriate  range  of  RMS  accelerations  for  the  background 
vibration  may  be  deduced  from  table  12  or  13.  Hence,  simulation 
of  the  shock  and  vibration  environment  at  the  seats  of  these 
vehicles  may  be  achieved  by  a  synthesis  of  two  signals:  one  to 
characterize  the  shocks,  and  the  other  to  characterize  the  near- 
continuous  background  vibration. 

For  the  purposes  of  the  present  study,  shocks  were  simulated 
using  the  lowest  frequency  (fundamental)  term  in  equation  1.20, 
resulting  in  a  damped  sinusoidal  waveform.  The  simulation 
requires  the  waveform  to  be  in  the  form  of  a  time  series  (i.e 
discrete  time  increments) ,  in  order  that  a  digitized  signal  may 
be  constructed.  Thus,  recasting  equation  1.20  into  a  time  series 
with  100  time  increments,  or  samples,  per  second  leads  to  the 
following  expression  for  the  lowest  order  (fundamental)  term: 


This  form  of  the  equation  has  been  used  to  generate  shock  signals 
for  the  pilot  laboratory  studies. 

The  basic  characteristics  of  this  time  series  have  been 
chosen  to  be  representative  of  the  shocks  most  commonly  recorded 
in  the  Z  direction  during  cross-country  operation  of  the  TGVs, 
namely  a  type  +2  shock  with  decay  rate  5]  =2.5.  Examples  of 
waveforms  with  these  properties  are  shown  in  figure  3 (A)  and  (C) . 
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It  was  anticipated  that  the  laboratory  experiments  would  require 
shocks  possessing  different  frequencies  and  peak  amplitudes, 
which  may  readily  be  constructed  by  changing  the  appropriate 
«  parameters  in  equation  8.1  (i.e.  (O,  and  a^)  . 

The  background  vibration  was  simulated  by  Gaussian  randomi 
vibration.  Reference  to  Appendix  E  reveals  that  there  are  few 
4  type  1  or  type  2  motions  observed  during  cross-country  operation 
of  TGVs .  Thus,  without  clear  evidence  for  the  dominance  of  one 
or  other  type  of  seat  motion,  the  more  suitable  background  signal 
for  the  laboratory  experiments  was  chosen.  This  signal  was 
produced  by  computer,  using  a  Gaussian  pseudo-random  number 
generator.  A  time  series  so  generated  is  shown  in  figure  36. 

It  can  be  seen  from  the  acceleration  waveform  of  figure  36 
that  the  waveform  is  not  unlike  that  in  figure  11,  which  is 
characteristic  of  a  type  1  Gaussian  random  seat  motion.  Further 
evidence  for  the  Gaussian  random  nature  of  the  time  series  used 
to  construct  the  waveform  may  be  obtained  from  its  amplitude 
probability  density  distribution,  shown  in  the  lower  left  of  the 
diagram.  Although  the  general  similarity  to  the  expected  shape 
of  the  distribution  function  can  be  seen,  the  best  evidence  for 
the  Gaussian  random  nature  of  the  signal  is  obtained  from  the 
values  of  RMT/RMS  and  1(0.97),  which  are  2.09  and  2.14, 
respectively.  From  the  discussion  of  Section  VI,  the  values  of 
these  parameters  are  both  expected  to  be  equal  to  2.16,  for  a 
Gaussian  random  signal.  This  condition  is  adequately  satisfied 
for  this  simulated  signal,  which  also  meets  the  requirements  for 
a  type  1  seat  motion  (see  Section  VI) . 


Multi-axis  ride  simulation  facility 

Shock  and  vibration  environments  are  generated  for  the 
laboratory  experiments  by  the  USAARL  multi-axis  ride  simulator 
(MARS) ,  through  computer  control  of  a  hydraulically-activated 
three-axis  vibration  exciter.  Each  of  the  three  orthogonal  axes 
is  activated  by  a  separate  hydraulic  ram,  which  is  controlled  by 
an  electronically-activated  spool  valve.  The  control  signals 
sent  to  the  spool  valve  are  processed  by  an  iterative  procedure, 
which  is  capable  of  achieving  a  high  degree  of  accuracy  between 
the  resultant  acceleration  waveform  and  the  desired  waveform. 

The  limits  of  motion  generated  by  the  system  are  governed  by 
a  number  of  different  factors.  The  software  controlling  the 
vibration  exciter  ensures  that  the  system  does  not  exceed  preset 
displacement,  velocity  and  acceleration  limits.  Of  primary 
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importance  is  that  the  system  does  not  operate  in  a  manner  that 
would  harm  a  subject.  A  nomograph  delineating  the  limits 
established  for  subject  protection  in  the  2  to  40  Hz  frequency 
range  is  shown  in  Figure  37.  This  nomograph  is  applicable  to  all 
three  axes  of  motion. 

A  nominal  4  g's  maximum  acceleration  limit  has  been 
established  to  prevent  subject  injury.  A  limit  of  ±2.5  inches 
displacement  is  due  to  shock  absorbers,  while  physical  stops  are 
at  ±3.5  inches. 

Control  of  motion  in  each  axis  is  performed  by  a  digitized 
time  series,  corresponding  to  the  target,  or  desired, 
acceleration  waveform.  The  characteristics  of  the  digital 
control  sequence  must  follow  the  stringent  requirements  of  the 
software,  which  is  currently  running  on  a  Digital  Equipment 
Corporation  PDP-11  mini-computer.  The  system  software  requires 
that  the  target  acceleration  time  series  be  digitized  at  a  rate 
of  100  samples  per  second  using  a  bipolar  13-bit  data  conversion, 
with  an  input  range  of  10.0  volts  (i.e.  +  10.0  V  is  represented 
by  the  digital  values  +  8192) .  The  system  calibration  is  set  so 
that  1.0  V  corresponds  to  1.0  g's  acceleration.  Control  signals 
are  generated  in  blocks  of  256  data  points,  corresponding  to  2.56 
seconds  of  acceleration. 

Further  details  on  the  MARS  system  can  be  found  in  the 
report  by  Jenkins  (1991) . 


Ijiipl.£mentatipn  sil.  waveforms  ths.  mars  ±a.clli,ty 

Currently,  control  records  of  up  to  330  seconds  have  been 
generated  and  reproduced  on  the  MARS  system.  The  digital  control 
sequence  for  each  axis  is  prepared  using  a  number  of  programs 
developed  on  the  GEDAP  software  system,  and  is  described  in  the 
following  subsections. 


8.3.1  Gaussian  waveform  generation 

In  order  to  synthesize  the  background  vibration,  a  Gaussian 
random  number  generator  was  used  to  produce  the  appropriate 
distribution  of  acceleration  amplitudes,  as  described  in  Section 
8.1.  For  convenience,  this  time  series  was  constructed  using 
software  running  on  an  IBM  PC,  with  the  resulting  file 
transferred  to  the  VAX  4000-200  over  an  Internet  connection. 


A  Gaussian  random  number  time  series  was  synthesized  with  a 
1.0  m-s~^  RMS  amplitude  (frequency  unweighted),  and  with  a  82.0  s 
duration.  This  basic  building  block  is  located  in  the  VAX 
directory  [vib . sig_gen]  and  has  the  file  name  gaus82.002. 
Gaussian  waveforms  of  any  duration  may  now  be  constructed  using 
the  GEDAP  programs  EXTRACT  (proprietary  program)  and  APPEND. 
Although  this  particular  waveform  has  zero  mean  and  is  band- 
limited  to  frequencies  from  0  to  80  Hz,  it  is  further  band 
limited  to  frequencies  between  2  and  40  Hz,  to  satisfy  the 
performance  requirements  of  the  MARS  vibration  exciter.  This  is 
done  using  GEDAP  program  FILTA  (proprietary  program) .  The  file 
can  also  have  its  level  changed  using  the  GEDAP  programs 
TRANSFORMl  (proprietary  program)  and  MULTIXY  (see  Appendix  C) . 


8.3.2  Shock  waveform  generation 

GEDAP  program  SHOCK  (Appendix  C)  is  used  to  generate  shock 
waveforms.  This  program  generates  type  +2  shocks,  which  may  be 
defined  by  their  constituent  (fundamental)  frequency,  initial 
peak  amplitude  (either  negative  or  positive) ,  and  location  in  a 
time  series,  as  described  in  Sections  8.1  and  1.3.  The  resulting 
shock  time  series  is  then  superposed  on  the  appropriate  Gaussian 
random  background  time  series.  Before  this  is  done,  however,  the 
Gaussian  signal  must  have  its  amplitude  reduced  to  zero  in  the 
immediate  vicinity  of  where  the  shocks  are  to  be  located.  This 
allows  the  true  amplitude  of  the  shock  to  prevail  in  the  time 
series,  without  "riding"  on  the  background  vibration.  This  is 
achieved  by  using  GEDAP  program  SNIP_GAUSSIAN  (see  Appendix  C) . 
The  final  record  is  then  produced  by  combining  the  shock  record 
and  the  modified  or  "snipped"  Gaussian  record,  using  GEDAP 
program  ADDXY  (Appendix  C)  . 


8.3.3  Final  preparation  of  signature 

Once  a  specific  acceleration  time  series  has  been  generated, 
it  is  further  massaged  so  that  abrupt  transitions  do  not  occur  on 
4^  start  up,  or  when  the  control  sequence  is  put  through  a 

repetitive  cycle  (to  construct  a  long-term  exposure) .  This  is 
achieved  by  introducing  one,  or  more,  transitional  blocks  of  data 
into  the  time  series,  each  of  which  contains  256  elements,  and 
lasts  for  2.56  s. 

♦ 

For  this  reason,  a  one  or  two  block  ramp  is  constructed  at 
the  beginning  and  end  of  each  exposure.  This  allows  the 
vibration  exciter  to  reach  its  full  acceleration  without  unwanted 
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discontinuities  in  the  motion.  The  ramp  is  linear,  and  is 
implemented  by  running  GEDAP  program  RAMP  (Appendix  C) . 

In  addition,  one  or  two  blocks  of  zero  acceleration  data, 
each  lasting  for  2.56  s,  are  usually  placed  at  the  beginning  and 
end  of  each  signature  using  GEDAP  program  APPEND.  This  allows  a 
brief  quiescent  period  on  start-up  or  between  sequence 
repetitions,  and  is  required  by  the  MARS  control  software. 

The  complete  signature  is  next  scaled  to  the  appropriate 
data  format  using  GEDAP  program  TRANSFORMl,  and  then  converted  to 
ASCII  format  using  GEDAP  program  EXPORT  (proprietary  program) . _ 
Once  control  signatures  have  been  generated  and  massaged  in  this 
way,  for  each  of  the  three  axes,  program  TOUSA  (Appendix  C) 
correctly  formats  the  output  file  in  a  form  that  can  be  used  by 
the  MARS  facility  software. 
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IX  Exposures  for  experiments  involving  human  subjects 


The  immediate  objective  of  the  pilot  study,  conducted  in 
Phase  3  of  the  project,  is  to  investigate  those  biomechanical, 
physiological  and  biochemical  human  responses  determined  from  a 
review  of  literature,  in  Phase  1,  to  be  the  most  promising  for 
the  prediction  of  injury  risk.  The  pilot  tests  will  include  both 
short-duration  exposures  (5.5  minutes)  and  long-duration 
exposures  (1  and  2  hour) . 


.Short-duration  experiments 

The  short-term  experiments  are  designed  to  increase 
understanding  of  human  response  to  individual  impacts  in  the  X,  Y 
and  Z  directions,  separately.  The  seven  5.5  minute  experiments 
are  outlined  in  table  21.  Specifically,  human  response  will  be 
investigated  with  respect  to  impact  frequency  (rise  time)  and 
peak  amplitudes  (conditions  1  to  4),  numbers  of  shocks  (condition 
5)  ,  shock/RMS  acceleration  magnitude  (condition  6)  and  swept  sine 
wave  (condition  7) .  This  last-mentioned  exposure  will  allow 
comparison  with  previous  work,  as  well  as  between  sinusoidal  and 
impact  vibration. 

Current  literature  documents  the  effect  of  vibration 
amplitude  and  frequency,  especially  for  sinusoidal  vibration. 
However,  comparatively  little  information  is  available  concerning 
human  response  to  impacts.  The  rise  time  and  amplitude 
experiments  are  designed  to  investigate  the  shock  frequency  to 
which  the  body  is  most  sensitive  in  each  axis,  and  to  determine 
whether  this  frequency  changes  with  changing  amplitudes  of 
shocks.  The  exposure  involving  different  numbers  of  shocks  will 
allow  comparison  of  various  impact  intervals.  It  may  be 
determined,  for  example,  that  at  a  particular  number  of  shocks 
per  minute,  the  muscles  respond  with  constant  levels  of 
contraction,  rather  than  characteristic  bursts.  The  experiment 
investigating  the  relationship  between  increasing  background 
vibration  and  2.0  g's  shocks  will  help  determine  the  level  of 
background  vibration  that  masks  the  response  to  individual 
impacts . 

Each  individual  shock  is  presented  to  the  subject  two  times 
(e.g.  each  combination  of  shock  amplitude  and  frequency  in 
conditions  1-4)  .  This  will  allow  for  investigation  of  variance 
within  an  individual.  The  rise  time  experiments  will  have  shock 
amplitudes  and  frequencies  presented  to  the  subject  in  a  random 


order,  and  the  time  interval  between  the  shocks  is  also  varied. 
This  will  help  minimize  anticipation  by  the  subject.  Shock 
number  experiments  cannot  be  randomized.  To  prevent  carry-over 
effects  from  the  more  arduous  30  shock  per  minute  condition,  this 
will  be  presented  last  to  the  subject. 

Unfortunately,  the  original  experimental  protocol  had  to  be 
modified  as  the  MARS  facility  could  not  produce  4  g  impacts  below 
approximately  7  Hz.  Maximum  shock  magnitude  was  limited  to  3  g's 
with  a  lower  frequency  limit  of  4  Hz  for  that  shock.  The 
statistical  tests  (repeated  measures  analysis  of  variance)  can, 
therefore,  be  conducted  for  frequencies  of  4,  6,  8  and  11  Hz. 

This  will  allow  for  investigation  of  interactions  between  the 
variables . 

A  "warm-up"  of  approximately  40  seconds  is  provided  at  the 
beginning  of  each  short-term  exposure.  During  this  period,  two 
shocks  will  be  presented  in  a  random  placement  to  the  subject.  No 
data  will  be  collected  for  these  two  shocks.  The  purpose  of  this 
pre-exposure  is  to  provide  an  accommodation  period,  under  the 
premise  that  the  human's  response  to  the  onset  of  a  shock 
environment  may  be  somehow  different  from  subsequent  shocks. 

The  six  experiments  in  the  short-term  exposures  require  a 
total  exposure  time  of  less  than  40  minutes,  and  will  be 
conducted  in  one  direction  during  one  day.  The  experiments  will 
involve  10  subjects,  and  the  repeated  measures  design  will  allow 
trends  to  be  determined. 


.2^  LQhg-duration  experiments 

The  long-duration  pilot  tests  are  designed  to  assess  the 
potential  fatigue  and  recovery  from  the  effects  of  repeated 
impact  over  a  two-hour  exposure  period.  Seven  conditions  of  two- 
hour  exposures  and  two  conditions  of  one-hour  exposures  will 
provide  information  about  human  response  to  exposures  containing 
different  shock  magnitudes  and  numbers. 

These  experiments  have  been  designed  to  elicit  information 
in  a  cross-sectional  design  as  well  as  a  longitudinal  design. 
Responses  will  be  compared  between  tests  of  varying  signatures  as 
well  as  throughout  individual  tests.  Indications  of  fatigue  will 
be  investigated  in  various  measurements  during  the  two-hour 
duration,  in  addition  to  recovery  following  any  fatigue.  In  the 
two-hour  experiments,  impacts  are  presented  primarily  in  the  Z 
direction.  In  these  experiments  a  small  background  RMS  will  be 
superimposed  in  the  X  and  Y  directions.  Condition  7  (table  22) 


has  impacts  presented  in  the  X,  Y  and  Z  directions  in  random 
order,  with  a  small  background  vibration  in  all  three  directions 
as  well.  The  one-hour  experiments  have  been  added  to  look 
specifically  at  impacts  in  the  Y  direction  and  X  direction,  in 
separate  exposure  conditions.  Here  a  small  background  RMS  is 
presented  in  the  other  directions. 

9.2.1  Two-hour  exposures 

The  design  of  the  exposures  for  the  two-hour  experiments  has 
been  chosen  to  investigate  a  number  of  sub-objectives.  The 
exposure  conditions  are  given  in  table  22.  The  first  condition 
is  a  control  experiment  with  no  vibration  or  shock  exposure.  All 
the  measures  will  be  analyzed  as  in  the  other  exposures.  This 
condition  is  necessary  as  a  baseline,  and  to  determine  the 
effects  of  fatigue  due  to  the  posture  adopted  by  the  subject, 
irrespective  of  vibration  and  impact. 

Conditions  2-5  are  calculated  as  equivalent  in  exposure 
severity  according  to  the  VDV  in  BS  6847  (1987) .  According  to 

the  dose  calculations  using  acceleration  at  the  fourth  power  (see 
equations  3.4  and  5.6),  exposure  to  conditions  of  greater  shock 
amplitude  must  be  accompanied  by  fewer  numbers  of  shocks. 
Differences  in  human  response  between  these  four  experimental 
conditions  will  help  us  to  understand  if  the  calculation 
procedures  of  the  VDV  best  account  for  human  responses,  or  if  a 
different  exponent  may  prove  more  accurate.  For  example,  the 
current  ISO  standard  is  based  on  the  second  power  of 
acceleration,  whereas  the  DRI  calculation  for  exposure  to 
repeated  impact  is  based  on  the  eighth  power  (See  Sections  III 
and  IV) . 

The  sixth  experimental  condition  has  been  designed  to  test 
the  relationships  between  shock  amplitude  and  number.  It 
contains  2.0  g's  shocks,  as  in  condition  4,  but  the  sixth 
condition  has  an  increased  number  of  shocks,  32  per  minute,  to 
give  twice  the  VDV  of  condition  4.  The  sixth  condition  will  also 
be  compared  with  condition  3  (1.0  g's  shocks  at  32  per  minute), 
which  contains  the  same  number  of  shocks  but  a  lower  amplitude, 
such  that  condition  6  again  has  twice  the  VDV.  These  comparisons 
will  enable  evaluation  of  the  role  of  amplitude  and  number  of 
shocks  in  human  response. 

Condition  7  incorporates  1.0  g's  impacts  randomly  in  each  of 
the  X,  Y  and  Z  directions.  This  condition  will  allow  evaluation 
of  the  stress  induced  by  impacts  in  different  axes.  Since  the 
shocks  occur  in  all  three  directions,  the  Z  direction  VDV  is 
lower  in  this  condition  than  in  the  others.  The  British  Standard 


recommends  calculating  and  evaluating  the  VDV  separately  in  each 
direction.  However,  the  actual  amplitude  and  number  of  shocks  is 
identical  to  condition  3,  and  theoretically  the  severity,  or  dose 
(if  all  axes  are  identical),  would  be  the  same.  If  the  same 
frequency  weighting  were  applied  to  all  three  axes,  then  the  VDV 
of  these  exposures  would  be  identical  to  the  others. 

Data  will  be  collected  intermittently  during  the  two-hour 
(and  one-hour)  experiments,  for  example,  for  4.5  minutes  every  10 
minutes  prior  to,  during  and  following  exposure  to  shock  and 
vibration.  The  objective  is  to  evaluate  changes  with  time,  as 
well  as  between  experimental  conditions.  For  example,  muscle 

'igue  will  be  evaluated  by  electromyography  (EMG)  over  the  two- 
--  -ir  exposure  and  compared  between  conditions  of  no  vibration  or 
shock,  vibration  only,  and  the  combinations  of  vibration  and 
shock  at  different  amplitudes  and  numbers  of  shocks. 


9 -2. 2  One-Hour  Experiments 

The  one-hour  experiments  are  designed  to  investigate  shocks 
in  the  X  and  Y  directions  in  a  limited  study.  The  exposure 
conditions  are  listed  in  table  23.  Results  of  these  experiments 
will  be  compared  with  the  first  hour  of  the  two-hour  experiments 
with  similar  shock  magnitude  (1.0  g's)  and  number  (32  shocks  per 
minute) .  The  severity  of  shock  input  at  the  seat  for  the  one- 
hour  experiment  will  be  the  same  as  the  first  hour  of  the  two- 
hour  experiments  (conditions  2-5,  and  7) .  As  with  the  two-hour 
experiments,  cross-sectional  and  longitudinal  differences  will  be 
investigated. 


.LJi  viliiiratiQn  .and  nhnck  duning  experiments 

The  shock  and  vibration  magnitudes  have  been  based  on  those 
found  in  data  from  TGVs,  discussed  in  Part  B  of  this  report.  The 
RMS  background  acceleration,  shock  amplitudes  and  rise  times,  and 
numbers  of  shocks  per  minute  reflect  typical  military  exposures 
driving  on  a  variety  of  ground  surfaces,  particularly  those  ^ 

encountered  during  cross-country  operations.  The  shocks  are  all 
of  type  +2  (or  -2) .  The  long-term  signatures  include  both 
positive  and  negative  shocks  presented  randomly.  All  have  a 
basic  frequency  (rise  time)  of  6  Hz.  The  short-term  signatures  ^ 

have  only  positive  shocks,  but  the  frequencies  vary  between  2  and 
11  Hz. 


The  levels  do  not  exceed  those  found  in  normal  training 
environments.  Additionally,  vibration  and  shock  magnitudes  have 


68 


been  compared  with  the  current  international  standard  ISO  2631 
(1985),  and  the  ASCC  guide  for  "Human  tolerance  to  repeated 
shock"  (Air  Standardization  Coordinating  Committee,  1982) .  The 
ISO  Standard  is  reflected  in  MIL  STD  1472C  and  is  the  most 
internationally  recognized  standard  for  human  exposure  to 
vibration.  All  short-term,  and  all  but  one  long-term, 
experimental  exposures  on  the  MARS  facility  fall  within  the 
"exposure  limit"  guidelines  of  ISO  2631  (1985) . 

The  ISO  standard,  although  widely  used,  is  limited  in  its 
applicability  to  exposures  containing  repeated  impact.  For  this 
reason  we  also  refer  to  the  ASCC  guide  for  human  tolerance  to 
repeated  shock.  The  DRI  curves  in  the  ASCC  guidelines  suggest 
maximal  magnitudes  and  numbers  of  shocks  that  can  safely  be 
sustained  during  a  24  hour  period.  Curves  in  the  ASCC  guideline 
suggest  levels  of  5%  injury  risk,  severe  discomfort  and  moderate 
discomfort  (see  figure  8) .  Experimental  exposures  have  been 
designed  to  be  well  below  the  limits  of  5%  injury  risk  and  also 
below  the  levels  of  severe  discomfort. 


2..A  Exposure  signatures 

The  seven  short-term  exposure  signatures  are  presented  in 
Figures  38-43.  VDV  values  and  RMS  accelerations  for  each  of  the 
7  short-term  experiments  are  given  in  Table  24. 

The  six  two-hour  experiment  signatures  are  shown  in  Figures 
44-49.  VDV  values  and  RMS  accelerations  for  the  six  exposures 
are  given  in  Table  25. 

The  one-hour  experiments  have  the  same  amplitude  and  number 
of  shocks  as  condition  2  in  table  25  (1  g's  amplitude  at  32 
shocks  per  minute) .  The  VDV  and  RMS  accelerations  for  the  one- 
hour  experiments  differ  from  those  for  the  Z  direction,  owing  to 
the  frequency  weighting  contained  in  the  British  standard.  The 
VDV  and  RMS,  respectively,  are  18.4  and  0.93  m-5~^ .  If  the 

same  weighting  were  applied  to  all  three  axes,  then  the  VDV  of 
these  exposures  would  be  identical  to  condition  2  after  one  hour. 
This  unweighted  equivalence  was  chosen  so  as  not  to  commit  the 
experimental  design  to  the  frequency  weightings  contained  in  the 
British  standard. 

All  exposure  signatures  have  been  successfully  implemented 
on  the  MARS  facility. 


Conclusions 


1 .  A  conceptual  framework  has  been  developed  with  which  to 
quantify  the  salient  parameters  of  seat  motion  in  TGVs,  and 
to  integrate  these  parameters  into  measures  of  shock  and 
vibration  exposure. 

2.  The  essential  elements  of  a  dose  model  for  quantifying  health 
effects  resulting  from  exposure  to  repeated  shocks  and 
vibration,  including  the  potential  for  biological  recovery 
processes,  have  been  identified  in  a  form  suitable  for 
machine  computation. 

3.  A  procedure  involving  computer  recognition  of  impulses, 
including  shocks,  and  other  transient  or  non-stationary 
motions  within  a  background  of  Gaussian  random,  or  near- 
sinusoidal,  vibration  has  been  developed  and  used  to  classify 
TGV  seat  motion  into  four  types:  1  -  Gaussian  random  motion; 

2  -  periodic  deterministic  motion;  3  -  intermittent  motion; 
and  4  -  impulsive  motion,  including  shocks. 

4.  The  ranges  of  mean  RMS  accelerations,  frequency  weighted 
according  to  BS  6841  (1987),  observed  for  type  1  and  type  2 
seat  motions  in  the  X  direction  of  TGVs  were  from  0.08  to 
0.69  m-s~^ ,  and  from  0.11  to  2.01  ms~^ ,  respectively.  The 
corresponding  ranges  of  mean  RMS  accelerations  in  the  Y 
direction  were  from  0.09  to  0.57  ms~^ ,  and  from  0.08  to  0.60 
ms~^;  and  in  the  Z  direction,  from  0.11  to  2.53  m-s~^ ,  and 
from  0.15  to  3.14  ms~^ ,  respectively. 

5.  A  classification  of  shock  waveforms  by  initial  peak 
amplitude,  fundamental  frequency,  and  decay  rate  has  been 
developed  and  used  to  analyze  the  shocks  recorded  at  the 
seats  of  TGVs,  from  which  representative  shocks  may  be 
deduced.  In  this  classification,  a  type  +2  shock  consists  of 
an  initial  positive  motion,  with  amplitude  greater  than  1.0 
g's,  followed  by  oscillatory  motion  that  include  one  more 
discernable  positive  oscillation. 

6.  The  most  commonly  observed  shock  in  the  Z  direction  during 
cross-country  operation  of  TGVs  was  a  type  +2  shock.  The 
fundamental  frequency  of  this  shock  waveform  ranged  from  0.95 
to  6.0  Hz,  and  there  were  a  minimum  of  three  such  shocks  a 
minute,  and  a  maximum  of  eight  per  minute.  The  maximum 
(peak)  positive  acceleration  observed  was  6.5  g's,  and 
maximum  (peak)  negative  acceleration  was  -2.0  g's. 

7.  The  most  commonly  observed  shock  in  the  X  direction  during 
cross-country  operation  of  TGVs  was  a  type  +1  shock.  The 
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fundamental  frequency  of  the  shock  waveform  ranged  from  1.0 
to  60  Hz,  and  there  were  a  minimum  of  20  such  shocks  a 
minute,  and  a  maximum  of  60  per  minute.  The  maximum  (peak) 
positive  acceleration  observed  was  3.7  g's,  and  maximum 
(peak)  negative  acceleration  was  -3.0  g's. 

8.  The  most  commonly  observed  shock  in  the  Y  direction  during 
cross-country  operation  of  TGVs  was  also  a  type  +1  shock. 

The  fundamental  frequency  of  the  shock  waveform  ranged  from 
0.8  to  40  Hz,  and  there  were  a  minimum  of  11  such  shocks  a 
minute,  and  a  maximum  of  29  per  minute.  The  maximum  (peak) 
positive  acceleration  observed  was  2.7  g's,  and  maximum 
(peak)  negative  acceleration  was  -1.4  g's. 

9.  The  shock  and  vibration  environment  at  the  seats  of  TGVs  has 
been  simulated  by  combining  two  signals:  one  to  characterize 
the  shocks,  and  the  other  to  characterize  the  near-continuous 
background  vibration.  The  former  has  been  synthesized  by  a 
+2  or  -2  type  shock,  and  the  latter  by  a  pseudo-random  time 
series  with  a  Gaussian  amplitude  probability  density 
distribution . 

10.  Exposure  signatures  have  been  created  from  the  two  types  of 
signals  and  successfully  run  on  the  MARS  facility,  for  use  in 
the  pilot  laboratory  experiments.  Shock  and  vibration 
signatures  have  been  constructed  in  which  the  amplitude,  rise 
time  (frequency) ,  number  of  shocks  per  minute,  and  background 
level  have  been  varied.  Shock  amplitudes  range  from  0.5  g's 
to  3.0  g's,  with  rise  times  of  2-11  Hz,  and  1  shock  per  2.5 
minutes  (at  3  g's)  to  32  shocks  per  minute  (at  1.0  g  and  2.0 
g's).  Short  term  (5.5  minutes)  experiments  have  been 
designed  to  evaluate  the  effects  of  these  variables  on  human 
response.  A  series  of  long  term  (1  and  2  hour)  experiments 
have  been  designed  to  evaluate  fatigue  effects  of  repetitive 
shock  environments. 
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Table  1 

Relationships  between  even  order  moments  and  roots, 
their  corresponding  root  mean  values  and  the  RMS  value, 
for  random  (Gaussian)  vibration 


Moment  &  Root 
Order,  m 

Root  Mean 
Value 

Relation 
to  RMS 

Probability 

FCa) 

2 

Q(fWS) 

1.00 

0.68 

4 

O-^rmQ) 

1.32 

0.81 

6 

iRMX) 

1.57 

0.88 

8 

1.79 

0.93 

10 

Cl-(KMD) 

1.98 

0.95 

12 

2.16 

0.97 

Note  that  all  odd-powered  moments  of  a  Gaussian  distribution  with 
zero  mean  value  are  identically  equal  to  zero. 


Table  2 

Values  of  parameters  for  single 
degree-of-freedom  biodynamic  model 


Source  Natural  Damping 

Frequency  Ratio 


fn 

(rad.s~i) 

(HZ) 

Fairley  and  Griffin 

31.4 

5.0 

0.475 

(1989) 

Payne  (1975) 

52.9 

8.42 

0.224 
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Table  3 

Definition  of  root  mean  and  integrated  dose  values, 
for  equal  even  order  moments  m  and  roots  r 


Moment  &  Root 
Order,  m,r 


Root  Mean  Corresponding  Dose  In  Terms  Of 

Value  Dose  Measure  Root  Mean  Value 


10,10 


12,12 


^WiRMS) 


■W(RMQ) 


■W(IIMX) 


^W(,RMD) 


■W(.RMT) 


T  \i/2 


Jo 

Jo 


7  '1  1/8 

[a^(0]®dO 


r  x  I / 10 

[a;,(0]'°d? 


^W(RUS)  [7] 


[TY 


^U{RMX)  [7] 


^W{RM0)  [7] 


^V{RMD)  [7]' 
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Table  4 

Computer  programs  developed  for  data  analysis 


1 . 

Program 

FILTV2.FOR 

2. 

Program 

BIODYN.FOR 

3. 

Program 

CREST3.FOR 

4  . 

Program 

IMPULSE. FOR 

5. 

Program 

ISO. FOR 

6 . 

Program 

SPECF.FOR 

7. 

Program 

APPEND. FOR 

8. 

Program 

MULTIXY.FOR 

9. 

Program 

SHOCK. FOR 

10. 

Program 

SNIP  GAUSS I AN. FOR 

11. 

Program  ADDXY.FOR 

12. 

Program 

RAMP. FOR 

13. 

Program 

TOUSA.COM 

Table  5 

Vehicles  tested  at  W.E.S. 


Vehicle 

Description 

Weight 

(lb.) 

Speed  Range 
(mph) 

Fast  Attack 

Light  Weight,  Highly 

2,750 

0-50 

Vehicle  (FAV) 

Mobile  Armed  Attack 

Vehicle 

M2-Bradley 

Armored  Fighting  Vehicle 

60,300 

0-35 
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Table  6 

Letourneu  ride  course  at  W.E.S. 


Ride  Course  Number 

Average  RMS  Roughness  (in.) 

1 

0.9 

2 

0.6 

3 

0.2 

4 

1.4 

5 

1.2 

6 

2.0 

7 

3.0 

Table  7 

Vehicles  tested  at  Aberdeen  proving  grounds 


Vehicle 

Description 

Weight 

(lb.) 

Speed  Range 
(mph) 

MlAl 

Fully  Tracked,  Low 

Profile,  Armored  Primary 
Assault  Weapon 

120, 000 

0-45 

MlAl  HTT 

MlAl  Variant 

120, 000 

0-45 

Ml 02 6  HMMWV 

High  Mobility,  Multi- 
Purpose  Wheeled  Vehicle 

10, 000 

0-50 

M109A3 

Self-Propelled  Howitzer 

53, 000 

0-35 

M923A2 

5-Ton  Cargo  Truck 

21,750 

0-60 

XM1076 

N/A 

N/A 

0-25 

M2HS  Bradley 

Bradley  Fighting  Vehicle 
Variant 

63, 000 

0-35 

Ride 

Table  8 

courses  at  Aberdeen  proving  grounds 

Test  Course 

Course  Composition 

Length 
(ft.  ) 

Paved 

Bituminous  Concrete 

2,235 

Gravel 

Compacted  Bank  Gravel 

10,714 

2 -Inch  Wash-Board 

Concrete 

822 

6-Inch  Wash  Board 

Concrete 

798 

Radial  Wash-Board 

Concrete 

243 

Belgian  Block 

Granite  Blocks  in  Concrete 

3,940 

Secondary  A 

Native  Soil 

2.4  miles 

Cross-Country  #1 

Moderate:  Loam  and  Gravel 

5.2  miles 

Cross-Country  #2 

Moderate  to  Rough:  Loam  and  Gravel 

1 . 8  miles 

Cross-Country  #3 

Rough :  Loam 

3.3  miles 

Cross-Country  #4 

Severe:  Loam  with  Marsh 

2.5  miles 

Churchville  B 

Hilly  Cross-Country 

Grades  up  to  29% 

Rough  native  soil  &  stone 

5.0  miles 

-4k 
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Table  9 

Higher-order  root  mean  and  dose  measures 
used  in  the  analysis  of  data 


Moment  & 
Root  m ,  r 


Root  Mean 
Value 


Definition 
of  Root  Mean 


Corresponding 

Dose 


■V(liMS) 


■U(JtMQ) 


1  nW 


j-  nN 


10,10 


12,12 


■W(RMX) 


■V(RMO) 


^W(RMD) 


■V(RMT) 


1  nN 

1  nN 


Illy 


'T'  nN 

nN 
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Table  10 

Types  of  seat  motion 


Type  1 


Type  2 


Type  3 


Type  4 


Gaussian  random  motion 


2.0  <  RMT/RMS  <2.5 
and  1(0.97)  <  2.3 
and  SPECF  <4.0 


Periodic  deterministic 
motion,  typically  dominated 
by  tonal  (narrow  band)  com¬ 
ponents;  may  be  amplitude 
modulated 


either  RMT/RMS  <  2.0; 
or  2.0  <  RMT/RMS  <2.5 
and  1(0.97)  <  2.3 
and  SPECF  >4.0 


Intermittent  motion  -  non¬ 
stationary  random  and  tran¬ 
sient  deterministic  signals 


either  RMT/RMS  >2.5 
and  1(0.97)  >  2.6; 
or  2.0  <  RMT/RMS  <2.5 
and  1(0.97)  >  2.3 


Impulsive  motion  including  RMT/RMS  >  2.5 
shocks  and  1(0.97)  <  2.6; 


where: 


RMT  ^  ^W(RMT) 
RMS  ^U'(RMS) 


^1/12 

f  nN  -V 

1/2 

1(0.97) 


F(0.97) 


([ctl] 

/>(0.985)  -  [ai.]  /’(0.015)) 


2a  1/ 


(JtUS) 


SPECF 


n 


Table  11 

Summary  of  motion  recorded  in  the  Z-direction  at  the  commander's 

seat  of  the  M2HS  Bradley 


Sll  S'S  :S  S  £  5  £  R  g  g  S  5  b:  S  &  2  S  2  ^  ^  Sb  g 

gl  oi  cv  rw  oi  fsi  •-  cn  cm  cv  ri  cs  rv  —  ev U-  c>j  oi  ri  ^ 


S  ^^  <N  <vl^leo  ^  o  eo  57  lO  ^ 
p  <N  p  p  o*^  p  CN  o  sn 
—  jrw  fw  ••  oi  rO  rj  —  <n 


—  Q«r9»— 
•'^•“'CN'-’Oirsrwoicv^ 


®r 

Ui(  e  f*3  VO  CD 
£1  2 


2  o  si-l?ls  s:r 

cvi  b  rNilblf'i  C  Njb 


eo  O  —  P  ^  OlO'C; 
—  ii  O;  K  cv  >|-.iP 

CN  O  —  O  rt 


r  ®  r  ®  C 

g  X)  g  -D  g  -D 

®  TJ  ®  Ti  ?  15 

£  ^  £  ^  c  ^  • 


imiH 
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Table  12 

Mean  values  of  RMS  acceleration  recorded 
in  TGVs  for  type  1  seat  motion 


Mean  Vaiues  for  Type  1  Siflnals  (RMS  m/sec'^2) 

Vehicle/Locotions 

X 

St  dev 

Y 

St  dev 

Z 

St  dev 

M2HS/Commander 

0.10 

0.03 

0.15 

0.06 

0.48 

0.11 

M2HS/Driver 

0.18 

0.06 

0.26 

0.07 

0.64 

0.10 

M2HS/Crew 

0.40 

0.22 

0.18 

0.11 

0.43 

0.04 

Ml  09/Chief 

0.22 

0.07 

0.21 

0.10 

0.94 

n/a 

Ml  09/Driver 

0.18 

0.12 

0.21 

0.09 

0.47 

0.05 

Ml  09 /Gunner 

0.19 

0.14 

0.20 

0.06 

0.57 

0.10 

MlAll-nT/Driver 

0.08 

0.01 

0.09 

0.04 

0.11 

0.03 

M 1 A 1  /Commander 

0.19 

0.03 

0.33 

0.12 

0.46 

0.09 

MlAl /Driver 

0.19 

0.04 

0.21 

0.06 

0.31 

0.20 

MlAl /Gunner 

0.20 

0.04 

0.22 

0.06 

0.35 

0.11 

MlAl /Loader 

0.23 

0.03 

0.21 

0.30 

1.22 

n/a 

|M  1076/Driver 

0.69 

0.24 

0.57 

0.19 

1.43 

n/a 

M923/Unknown 

n/a 

n/d 

0.34 

n/d 

0.55 

0.25 

1 

HMMMV/Driver 

0.43 

0.48 

0.13 

n/a 

1.87 

n/a 

HMMMV/CurbFront 

0.16 

0.20 

0.10 

n/a 

0.40 

n/a 

HMMMV/CurbRear 

0.18 

0.15 

0.35 

0.20 

1.92 

0.39 

HMMMV/RoodReor 

0.21 

0.17 

0.39 

n/a 

2.53 

n/a 

♦ 


♦ 
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Table  13 

Mean  values  of  RMS  acceleration  recorded 
in  TGVs  for  type  2  seat  motion 


Meon  Values  for  Type  2  Signols  CRMS  m/secA2) 


Vehicle /L( 

Dcotions 

X 

St  dev 

Y 

St  dev 

Z 

1 

M2HS/Commander 

0.71 

1.06 

0.14 

0.08 

0.87 

0 

'M2HS/Driver 

0.21 

0.10 

0.60 

0.39 

1.04 

0 

M2HS/Crew 

0.35 

0.04 

0.23 

0.20 

1.87 

0 

Ml  09/Chief 

0.39 

0.31 

0.27 

0.12 

3.14 

1 

M109/Driver  | 

0.36 

0.26 

0.33 

0.16 

1.05 

0 

Ml  09/Gunner  | 

0.24 

0.25 

0.44 

0.36 

1.19 

1 

MIAIHTT/Driver 

0.13 

0.10 

0.08 

0.02 

0.15 

0 

MlAl /Commander 

0.52 

0.38 

0.44 

0.03 

0.86 

0 

MlAl /Driver 

0.51 

0.34 

!  039 

0.13 

0.56 

0, 

MlAl /Gunner 

2.01 

2.14 

0.60 

0.03 

0.72 

0, 

MlAl/Loader 

0.64 

0.13 

i  0.57 

0.30 

0.94 

0, 

Ml  076/Driver 

1.01 

0.42 

0.54 

0.17 

2.06 

0 

M923/Unknown 

1.31 

1.42 

0.32 

0.13 

1.95 

0, 

1 

HMMMV/Driver 

0.29 

0.29 

0.40 

0.21 

1.20 

0, 

HMMMV/CurbFront 

1  0.27 

n/o 

0.30 

0.16 

1.26 

0, 

HMMMV/CurbReor 

0.39 

0.13 

0.44 

0.14 

n/a 

n 

HMMMV/RoadRear 

0.11 

0.10 

0.21 

0.13 

3.04 

1 
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Table  14 

Shock  parameters  recorded  in  the  Z-direction  at  the  commander's 
seat  of  the  M2HS  Bradley  during  cross-country  operation 


Table  15 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  X-direction 
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Table  16 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  Y-direction 
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Table  17 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  Z-direction 
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Table  18 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  X-direction  during  cross-country  operation 


♦ 


•4 


TITLE: 

12.0  CROSS-COUNTRY  SHOCKS 

DIRECTION: 

X 

SHOCK 

%  OFTOTAL 

PEAK  AMP.  RANGE  (G) 

FREQ.  RANGE  (HZ) 

No./min.  j 

TYPE 

SHOCKS 

+ve 

-ve 

min. 

max. 

min. 

max. 

+1 

60.0 

3.7 

3.0 

1.0 

60.0 

200 

60.0 

+2 

+3 

44 

10.0 

4.0 

3.0 

- 

50.0 

200 

60.0 

-1 

-2 

10.0 

2.5 

5.0 

60.0 

20.0 

600 

-3 

10.0 

1.5 

2.0 

40.0 

-4 

10.0 

1.5 

2.5 

600 

20.0 

60.0 

[Total  /  of  shocks  with  f<60  Hz 

10 

♦ 


*■ 
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Table  19 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  Y-direction  during  cross-country  operation 


Table  20 

Summary  of  shock  parameters  observed  at  the  seats  of  tactical 
ground  vehicles  in  the  Z-direction  during  cross-country  operation 
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Table  21 

Exposure  conditions  for  short-duration  experiments 


Condition 

Variable 

Background 

Shock 

Shock 

Time 

Number 

rms  level 

Frequency 

Amplitude 

(rise 

time) 

1 

Rise  Time 

O.OSg 

2,  4, 

6, 

0.5  g 

5.5  min 

■ 

broad  band 

8,  11 

2 

2,  4, 

8,  11 

6, 

ig 

5.5  min 

3 

4,  5, 

8,  11 

6, 

2g 

5.5  min 

4 

4,  5, 

8,  11 

6, 

3g 

5.5  min 

5 

Shock  Ntimber 

0.05  g 

2/80  sec. 

broad  band 

6  Hz 

2g 

5.5  min 

13/80  sec. 

6  Hz 

2g 

40/80  sec. 

6  Hz 

2g 

6 

Background 

rms/shock 

relationship 

O.lg 

0.l7g 

6  Hz 

2g 

5.5  min 

2  shocks /min. 

6  Hz 

2g 

0.25g 

6  Hz 

2g 

0 . 4g 

6  Hz 

2g 

7 

Response  to 

0.3g 

sinusoidal 

N/A 

1.5  min 

single 

at  2  Hz 

to 

amplitude 

17  Hz 

at 

swept  sine 

1/4  Hz 

per 

wave 

second 
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Table  22 

Exposure  conditions  for  two-hour  experiments 


Number 

Z  axis 

rms 

X  axis 

zms 

Y  axis 

rms 

Shock 

Ampl . 

Shock 

No. 

Control . 

none 

none 

none 

none 

none 

2. 

Background  rms 

0.1 6g 

O.OSg 

O.OSg 

none 

none 

3, 

shocks  +  rms 

O.OSg 

O.OSg 

O.OSg 

Ig  2  only 

32 /min . 

4. 

shocks  +  rms 

O.OSg 

O.OSg 

O.OSg 

2g  2  only 

2 /min. 

5. 

shocks  +  rms 

O.OSg 

O.OSg 

O.OSg 

3g  2  only 

1/2. S 

min. 

6. 

shocks  +  rms 

O.OSg 

O.OSg 

O.OSg 

2g  2  only 

32/min . 

1 

shocks  +  rms 

O.OSg 

O.OSg 

O.OSg 

Ig  shocks 

in  X,  Y, 

and  Z 

32 /min . 

random 

Table  23 

Exposure  conditions  for  one-hour  experiments 


Number 

Z  axis 

X  axis 

Y  axis 

Shock 

Shock 

rms 

rms 

rms 

Ampl. 

No. 

1 .  Y  rms  &  shocks 

O.OSg 

0 .  OSg 

O.OSg 

Ig  in  Y 

32/min 

2 .  X  rms  &  shocks 

O.OSg 

O.OSg 

O.OSg 

Ig  in  X 

32/min 
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Table  24 

VDV  and  RMS  accelerations  short-duration  experiments 


Exposure 

Description 

VDV 

RMS  (id.8-2) 

Rise  Time 

(5.5  min) 

0.5g,  at 

2,4, 6, 8, 11  Hz 

3.8 

0.64 

1 . Og  at 
2,4,6,8,11  Hz 

5.5 

0.697 

2.0g  at 
4,5,6,8,11  Hz 

11.01 

0.895 

3.0g  at 

4,5,  6,  8, 11  Hz 

22.48 

1.44 

Shock  Number 

2g  shocks  at 

6Hz  at  2/80 

sec,  13/80  sec 

and  40/80  sec 

16.33 

1.46 

Background 

rms /shock 

relationship 

2g  shocks  at 
O.lg,  0.17g, 
0.25g  and  0.4g 
background  rms 

20.35 

: 

3.11 

Swept  sine 

wave 

1/4  Hz  per 

second  from  2- 

16  Hz. 
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Table  25 

VDV  and  RMS  accelerations  long-duration  experiments 


E^^sure 

Description 

VDV  (for  z- 

axis) 

RMS  (m.8-2} 

(for  z-axis) 

Background  RMS 

no  shocks 

0.16g  in  2- 
axis,  0.02g  in 

X  and  y-axes 

25.88 

2.10 

Ig  shocks  and 

RMS 

Ig  shocks  at 
32/min . -0 . 05g 

rms  in  2-axis 

and  0.02g  in  x 

and  y-axes 

24.18 

1.36 

2g  shocks  and 

RMS 

2g  shocks  at 

2/min.  -0.05g 

rms  in  2-axis 

and  0.02g  in  x 

and  y-axes 

24.3 

0.87 

3g  shocks  and 

RMS 

3g  shocks  at 

1/2.5  min  - 

0 . 05g  rms  in 

2-axis  and 

0.02g  in  x  and 

y-axes 

24.2 

0.73 

2g  shocks  and 

RMS 

2g  shocks  at 

32/min.  - 

0.05g  rms  in 

2-axis  and 

0.02g  in  x  and 

y-axes 

48.18 

■ 

2.54 
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Table  25  (continued) 

VDV  and  RMS  accelerations  long-duration  experiments 


Shoc)cs  in  X,  Y 

Ig  shocks  in 

18.42 

0.93 

and  Z 

X,  y  and  Z 

(24.2  if 

axes  -0.05g 

uniform 

rms  in  2-axis 

weighting 

and  0.02g  in  x 

applied  in  all 

and  y-axes 

axes) 

Stationary 

Random 


I 


Non*stalionary 

Random 


Figure  1 

Examples  of  deterministic  and  random  vibration  waveforms 

shocks  (after  Griffin,  1990) . 


•  (^^siu)  uor,ej9)3«y 

C7)d 


Figure  2 

Acceleration  wave  form  a(t)  (figure  2A) ,  cumulative  acceleratio 
amplitude  probability  distribution  (figure  2B)  and  acceleratio 
amplitude  probability  density  distribution  p(a)  (figure  2C)  for 
random  signal  with  zero  mean  value 


0  50  1  00  150  200  250  300  350  400  450  500 

u  C=1  oot] 


CBD  Shock  Type  +2,  fi  =  2  Hz  [fi ,  -fsD 


CC]  Shock  Typo  +2,  fi  =  4  Hz 


Figure  3 

Shock  time  histories  constructed  using  equation  1.20 
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Acceleration  Weighting 


q 


3SN0dS3y  A0N3n03ai 

Figure  6 

Single  degree-of-f reedom  biodynamic  model  for  human  response  to 

vibration  and  shocks. 
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Figure  7 

Mean  normalized  apparent  mass  of  60  subjects  (±1  standard 
deviation) ,  shown  as  magnitude  and  phase,  compared  with  the 
response  of  the  Fairley  and  Griffin  model  (Fairley  and  Griffin, 
1989) .  [Figure  reproduced  with  permission  of  J  Biomechanics] 
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NUMBER  OF  SHOCKS  IN  24  HOURS 


RISK  OF  SPINAL  INJURY 


I  I  I  I 

OO  (O  ^  N 


Figure  9 

Example  of  grouping  DRI  values  to  construct  magnitude  windows  for 
assessing  the  hazard  of  exposure  to  multiple  shocks. 
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NUMBER  OF  SHOCKS  IN  24  HOURS 


N  MEASUREMENT  EVALUATION 

MOTION)  Digital  computation  _  _ 


Figure  10 

Block  diagram  of  measurement  and  analysis  methodology 


(ln/««e') 


Figure  11 

Seat  motion  analyzed  using  frequency  weighting  in  British 
standard,  BS  6841  (1987).  Signal  type  1:  Gaussian  random  motion 
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[VIBl  Z4-0EP-1BB2  16:18 


■ 


Seat 

Signal 


♦ 

Figure  12 

motion  analyzed  using  frequency  weighting 
in  British  standard,  BS  6841  (1987) . 
type  2:  Near  sinusoidal  low-frequency  motion 
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Figure  13 

Seat  motion  analyzed  using  frequency  weighting 
in  British  standard,  BS  6841  (1987) . 

Signal  type  2:  Near  sinusoidal  high-frequency  motion 
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Figure  14 

+.  analyzed  using  frequency  weighting  in  British 

standard,  BS  6641  (1987).  Signal  type  3:  Transient  random  motion 
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RESEARCH  Corporalion 


[VIB.Pr«-PDr.M2M0. COMMANDER]  Z4-BEP-1D02  17: 


4 


♦ 


Figure  15 

Seat  motion  analyzed  using  frequency  weighting 
in  British  standard,  BS  6841  (1987) . 
Signal  type  3:  Transient  sinusoidal  motion 
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Figure  16 

Seat  motion  analyzed  using  frequency  weighting  in  British 
standard,  BS  6841  (1987).  Signal  type  2:  Amplitude-modulated 

near-sinusoidal  motion 
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Figure  17 

Seat  motion  analyzed  using  frequency  weighting  in  British 
standard,  BS  6841  (1987).  Signal  type  4:  Impulses  (shocks) 
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BC  Hrllish  Columbia  Research 

RESEARCH  Corporation 


Figure  18 

Seat  motion  analyzed  using  frequency  weighting  in  British 
standard,  BS  6841  (1987) .  Signal  type  4:  Impulses  (shocks) 
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Figure  19 

Seat^motion  analyzed  using  frequency  weighting 
'in  British  standard,  BS  6841  (1987) . 

Signal  type  2:  Oscillatory  motion  with  impulses  (shocks) 
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*!• 


Figure  20 

Seat  motion  analyzed  using  frequency  weighting  in  the  ISO 
standard,  ISO  2631  (1985).  Signal  type  1:  Gaussian  random  motion 


AeetUrtiltB 


Figure  21 

Seat  motion  analyzed  using  frequency  weighting  in  the  ISO 
standard,  ISO  2631  (1985).  Signal  type  2:  Near  sinusoidal  motion 
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Figure  22 

Seat  motion  analyzed  using  frequency  weighting  in  the  ISO 
standard,  ISO.  2631  (1985).  Signal  type  3:  Transient  random  motion 
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Figure  23 

Seat  motion  analyzed  using  frequency  weighting  in  the  ISO 
standard,  ISO  2631  (1985).  Signal  type  4:  Impulses  (shocks) 
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RESEARCH  Corporation 


Figure  24 

Seat  motion  analyzed  using  Fairley-Griffin  biodynamic  model. 
-Signal  type  1:  Gaussian  random  motion 
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Figure  25 

Seat  motion  analyzed  using  Fairley-Griffin  biodynamic  model. 
'Signal  type  2:  Near  sinusoidal  motion 
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Figure  26 

Seat  motion  analyzed  using  Fairley-Griffin  biodynamic  model. 
'Signal  type  3:  Transient  random  motion 
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Figure  27 

Seat  motion  analyzed  using  Fairley-Grif fin  biodynamic  model 
(Table  2).  Signal  type  4:  Impulses  (shocks) 
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Figure  28 

Seat  motion  containing  impulses  (shocks)  analyzed  using  frequency 
weighting  in  British  standard,  BS  6841  (1987)  during  cross¬ 
country  operation  of  MlAl  (X  direction) . 
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Figure  29 

Seat  motion  containing  impulses  (shocks)  analyzed  using  frequency 
weighting  in  British  standard,  BS  6841  (1987)  during  cross¬ 
country  operation  of  MlAl  (Y  direction) . 
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Seat  motion  containing  impulses  (shocks)  during  cross-country 
operation*  of  MlAl  (Z  direction  -  no  frequency  weighting)  . 
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1.  MINIMUM  AMPLITUDE:  1.0  G 

2.  MINIMUM  (TIME)  SEPARATION:  0.25  SEC 

3.  TYPES: 


TYPE:  +1  TYPE:  +2 


Figure  31 

Definition  of  shocks 


RUN  023 


Figure  32 

Seat  motion  waveform,  containing  shocks,  during  cr'OsS“Country 

operation  of  M2HS  Bradley 
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Time  (seconds) 


Figure  33 

Detail  from  the  seat  motion  waveform  in 
Figure  29  showing  shock  event  #4. 
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Time  (seconds) 


Figure  34 

Detail  from  the  seat  motion  waveform  in 
Figure  29  showing  shock  event  #5. 


Figure  35 

Seat  motion  waveform,  containing  repeated  impacts,  during  cross¬ 
country  operation  of  M109A3 
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Figure  36 

Simulated  Gaussian  random  motion 
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ACCELERATION  aCtl 


PEAK  VELOCITY  —  INCHES  PER  SECOND 


N^'!BF5>‘^“riOM  rvi0r\/^00P^ 


Figure  37 

Limits  of  motion  established  for 
-subject  safety  at  the  MARS  facility 
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PEAK-TO-PEAK  DISPLACEMENT 
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(^^O0s/m)  X0DDP 
Figure  39 

Exposure  signature  -  short-term  2 
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Figure  41 

Exposure  signature  -  short-term  4 
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Figure  43 

Exposure  signature  -  short-term  6 
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Figure  44 

Exposure  signature  -  long-term  1 
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Figure  45 

Exposure  signature  -  long-term  2 
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Figure  46 

Exposure  signature  -  long-term  3 
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Figure  47 

Exposure  signature  -  long-term  4 
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Figure  48 

Exposure  signature  -  long-term  5 
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Figure  49 

Exposure  signature  -  long-term  6 
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Appendix  A 


Data  Acquisition  System 


y 
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CD  ROM 
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GB  TAPE  BACKUP 


LABORATORY  CONFIGURATION 


A)  An  XR-510  14  channel  analog  recorder  is  used  to  play  back 
the  data  recorded  during  the  vehicle  test  runs.  At  a  tape 
speed  of  4.8  cm/sec  each  data  channel  has  a  bandwidth  from 
DC  to  1.25kH2  and  a  signal-to-noise  (SN)  ratio  of  47dB. 

Aj'  audio  track  is  usually  implemented  during  the  recording 
process  to  facilitate  data  queueing  by  providing  the  tank 
commander's  comments. 

B)  An  HP  8111A  function  generator  is  used  as  a  system 
calibration  reference  by  simulating  the  outputs  of  the 
accelerometers  swinging  through  full  scale. 

C)  Aji  eight  channel  Terrascience  signal  filter/amplifier  is 
used  to  ensure  sufficient  signal  strength  and  to  prevent 
aliasing  frequencies  greater  than  500  Hz  when  the  data  is 
being  sampled  by  the  VAX. 

D)  A  Tektronix  2213  oscilloscope  is  used  to  monitor  both  the 
raw  data  signals  coming  from  the  tape  playback  unit  as  well 
as  the  signal  generator.  It  proves  most  useful  for  detecting 
clipped  data  signals. 

E)  A  CD-ROM  drive  did  not  have  any  active  role  in  the  data 
acquisition  or  subsequent  processing  but  was  used  to  load 
the  system  software. 

F)  The  VAX  4000-200  forms  the  hub  of  the  system,  controlling 
the  data  acquisition  system  (ADQ32)  and  processing  the 
resulting  data  as  per  the  defined  software  routines. 

The  ADQ32  is  capable  of  sampling  32  single-ended  channels  at 
a  ma.ximum  rate  of  200,  000  samples  a  second. 


TECHNICAL  SPECIFICATIONS 


XR-510  Teac  Data  Recorder 


14  channel  FM  recorder  using  VHS  standard  magnetic  tape 


*  Bandwidth 

*  S/N  ratio 

*  Flutter 

*  Input  impedance 

*  FM  harmonic  dist. 

*  Crosstalk 


DC  -  1.25  kHz 
4  7  d3 

0.55%  p-p  (0.2  -  313  Kz) 
(meets  IRIG  118-73  specs) 

1  Mohm  unbalanced 
1%  or  less 

less  than  noise  level  between 
channels 


All  measurements  above  taken  at  a  tape  speed  of  4.76  cm/sec 
(1  7/8  ips)  . 


ADQ32  Digital  Equipment  A/D  Converter  Module 


*  Channels 

Input  amplifier 

*  Input  impedance 

*  Input  amp  accuracy 

*  Bandwidth 

*  CMRR 


32  single-ended 
16  differential 

10  Mohms 
0.010%  G  gain=l 
950  KHz  0  gain=l 
55  dB 


A/D  converter 

*  Conversion  time 

*  Resolution 

*  Diff  linearity 

*  Integral  linearity 

*  Max  drift  over  temp. 

*  Maximum  throughput 


3  uSec 
12  bits 
0.2-2  LSB 
1.5  LSB  max 
+/-  1  LSB 

200,000  samples/sec 


ST41B  Terrascience  Analoa  Siqnal  Conditioner 


*  Input  impedance 

*  CMRR 

*'  Gain  accuracy 

*  Filter 

*  Output  impedance 


>10  Mohms 

90  dB  (DC  -  60  Hz) 

0.05% 

4-pole  Butterworth  low  pass 
(fc  is  jumper  selectable) 
100  ohms 
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*  Bandwidth 

*  Input  impedance 


60  MKz 
1  Mohm 
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Appendix  B 


Description  of  Vehicles 


Instrument  Location 
M-2  P.V- 


► 


k 


Schematic  showing  locations  of  instrumentation  on  the  M3 
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SECTION  1.  INTRODUCTION 


1 . 1  BACKGROUND 


None. 


1.2  DESCRIPTION  Or  ILATERIEL 

a.  The  HlAl  tank  is  a  fully  cracked,  low  profile,  armored  vehicle  which 
will  augment  the  baseline  Ml  as  the  U.S.  Amy's  primary  assault  weapon. 
Operated  by  a  crew  of  four,  the  57.2-Detric  ton  (63-toii)  MlAl  is  powered  by 
a  1118-kW  (1500-hp)  turbine  engine  (AGT-1500)  driving  an  automatic 
transmission  (X1100-3B)  which  includes  differential  steering  and  braking 
functions.  With  governed  maximum  speed,  the  MlAl  can  attain  a  top  speed  of 
68  km/hr  (42  mph)  on  level,  hard  surface  roads.  The  torsion  bar  spring, 
rotary  dampened  suspension  allows  the  MlAl  to  maintain  its  high  speed 
capability . over  cross-country  terrain. 

b.  The  MlAl's  main  weapon  is  the  120-mm  M256  smoothbore  cannon,  which 
is  mounted  in  a  360°  traversable  turret.  The  MlAl  carries  40  rounds  for 
this  weapon,  34  in  the  turret  bustle  ammunition  compartment  and  6  in  the 
hull  compartment.  Secondary  weapons  include  a  7.62-ma  M240  machine  gun 
coaxially  mounted  on  the  right  of  the  main  gun  mount,  another  7.62-mia  M240 
machine  gun  skate  mounted  at  the  loader’s  hatch,  and  a  caliber  .50  M2HB 
machine  gun  mounted  externally  at  the  commander's  station.  The  MlAl  carries 
1000  caliber  .50  rounds  and  11,400  7.62-mn  rounds. 

c.  The  MlAl  tank's  fire  control  system  features  a  turret,  stabilized  in 
azimuth,  and  a  gunner's  primary  sight  (GPS)  stabilized  in  elevation.  The 
GPS  includes  dual  power  day  vision,  a  dual  power  thermal  imaging  system,  a 
laser  rangefinder,  and  a  sight  extension  to  the  tank  commander's  station. 
Other  elements  of  the  fire  control  system  include  a  digital  ballistic 
computer,  a  crosswind  sensor,  a  bustle  ammunition  temperature  indicator,  a 
manual  muzzle  reference  system,  a  gunner's  auxiliary  sight,  and  commander's 
weapon  sight.  The  MlAl  ballistic  computer  uses  the  point  mass  trajectory 
method  to  calculate  the  ballistic  solution  for  main  weapon  ammunition.  ’  The 
gun  turret  drive  is  electronically  controlled  and  hydraulically  powered. 

1.3  TEST  OBJECTIVE 

The  objective  of  this  test  was  to  determine  the  acceleration  levels  at 
the  four  crew  seats  during  operation  on  various  test  courses  and  to  perform 
a  ride  quality  analysis  in  terms  of  ISO  Standard  2631-1978. 

1.4  SCOPE 

The  Vibration  Test  Branch  of  the  U.S.  Army  Combat  Systems  Test  Activity 
(USACSTA)  was  responsible  for  instrumenting  the  MlAl  tank,  conducting  the 
tests,  and  acquiring  and  processing  all  test  data.  Ride  quality  testing  was 
conducted  on  the.M1.4T  tank  from  25  June  through  30  July  1987  . 
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SECTION  1 .  II7TEODUCTION 


1.1  BACKGROUND 
None 


1.2  DESCRIPTION  OF  flAIERIEL 

The  High  Mobility,  Multi-Purpose,  Wheeled  Vehicle  consists  of  a  conmon 
chassis  capable  of  accepting  various  body  configurations  to  accoinnodate  veapon 
systems,  utility  and  ambulance  roles.  The  vehicle  used  in  this  test  is  the 
veapons  system  version. 


1.3  OBJECTIVES 

The  objectives  of  this  test  vere  to  determine  the  input  and  response  ac¬ 
celeration  levels  of  various  components  of  the  TOW  missile  system  and  to 
measure  whole-body  vibration  at  each  crew  position. 


1 . k  SCOPE 

The  US  Army  Combat  Systems  Test  Activity  was  responsible  for  supplying  the 
data  recording  instrumentation,  for  conducting  the  test,  for  recording  the 
vibration  data  and  all  data  reduction.  Testing  was  accomplished  during  the 
period  of  19  and  20  September  198^*  The  testing  covered  by  this  report  is  the 
road  shock  and  vibration. 


155 


.^KrTTON  1.  EXECUTTVE  DIGEST 


1.1  SUMMARY 

There  was  no  visible  damage  to  the  MX09A3E2  howitzer  as  a  result  of  the 
road  vibration  and  firing  rests. 

Ride  quality  data  measured  during  the  road  vibration  test  indicated  that 
the  Six- Inch  Washboard  course  caused  the  worst  ride  conditions.  Strain  levels 
measured  during  the  road  test  were  low  enough  to  be  considered  insignificant. 

The  majority  of  the  acceleration  frequency  domain  data  indicate  that  the 
vibration  energy  is  below  100  Hz  during  road  operations. 

As  expected  vibration  and  strain  values  were  higher  during  the  firing  test. 
Shock  response  and  shock  intensity  spectra  were  computed:  the  results  are 
included  in  the  appendices.  The  firing  test  did  excite  frequencies  above  500  Hz 
at  the  two  locations  which  were  not  low-pass  filtered  at  500  Hz. 

No  single  firing  condition  could  be  considered  the  worst  case  as  the 
highest  measured  levels  were  not  consistent  with  the  measurement  location  and 
firing  configuration. 

1.2  TEST  OBJECTIVES 

The  objectives  of  this  test  were: 

a.  To  determine  whether  the  improved  components,  once  integrated,  fiinction 
as  intended. 

b.  To  provide  data  which  will  reasonably  assure  that  the  prototype  vehicle 
can  attain  the  desired  system  hardware  reliability  for  operations  in  accordance 
with  the  Howitzer  Improvement  Program  (HIP)  operational  mode  summary /miss ion 
profile . 

c.  To  assess  whether  the  selected  design  for  each  improved  component  is 
acceptable  for  continued  test. 

d.  To  provide  data  on  system  safety. 

1.3  TESTING  AUTHORITY 

None . 

1.4  TESTING  CONCEPT 

The  M109A3E2  howitzer  was  subjected  to  road  vibration  and  firing  shock 
testing.  The  testing  was  conducted  from  6  July  through  19  August  1988.  The 
Vibration  Test  Branch  of  the  U.S.  Army  Combat  Systems  Test  Activity  was 
responsible  for  instrumenting  the  test  item,  conducting  the  test,  and  acquiring 
and  processing  all  test  data. 


1.5  SYSTEM  DESCRIPTION 


The  HIP  is  a  product  improvement  of  the  M109A2/A3  (US  version)  and  the 
M109A1B  (Israeli  version).  The  HIP  consists  of  a  155-mm  self-propelled  howitzer 
(SPH) ,  its  integrated  logistic  support  (ILS),  and  command,  control,  and 
communication  (C  )  interfaces  with  the  artillery  fire  support  system. 

The  U.S.  HIP  SPH,  designated  the  M109A3E2,  is  an  armored,  full -tracked 
howitzer  carrying  a  minimum  of  34  complete  conventional  geometry  rounds  and  two 
oversized  projectiles  on  board  (Figure  B-1).  It  is  operated  by  a  nominal  crew 
of  four,  including  the  driver.  Its  main  armament  consists  of  a  modified  version 
of  the  M185  cannon  assembly  (the  M284)  and  M178  gun  mount  (the  XM182E1) 
currently  employed  on  the  M109A2/A3/A3E1.  All  current,  as  well  as 
developmental,  U.S.  conventional  155-mm  artillery  projectiles  will  be  system 
compatible.  The  cannon,  propelling  charge,  and  projectile  mix  will  permit 
unassisted  ranges  of  at  least  22  km  and  a  maximum  assisted  range  of  at  least 
30  km.  A  new  turret  structure  is  provided  to  enhance  integration  of  the  various 
turret  improvements  and  vulnerability  reduction  measures  and  to  improve  overall 
crew  compartment  layout  and  space.  The  fire  control  system  is  fully  automated, 
providing  accurate  position  location  and  azimuth  reference,  onboard  ballistic 
solutions  of  fire  missions,  and  computer  controlled  gun  drive  through  servos 
with  manual  backup.  These  improvements  should  permit  flexibility  in  employment 
and  enhance  responsiveness  and  firing  rate.  The  SPH  is  expected  to  fire  within 
30  seconds  when  emplaced  and  within  60  seconds  when  on  the  move  from  receipt  of 
a  fire  mission.  Digital  and  voice  communications  utilizing  current  systems,  and 
the  Signal  Channel  Ground/Air  Radio  System  (SINCGARS)  through  an  onboard 
communications  processor,  will  enable  dispersed  operations/missions  from  one 
firing  unit  to  multiple  howitzers .  Tactical  and  technical  fire  control  and 
direction  is  maintained  primarily  through  an  interface  with  the  BCS,  and 
Advanced  Field  Artillery  Tactical  Data  System  (AFATDS) ,  on  both  voice  and 
digital  data,  through  KY57  speech  security  devices  (COMSEC) . 

The  M109A3E2  incorporates  state-of-the-art  materials  and  technologies  to 
achieve  maximized  availability  and  maintainability  through  the  use  of  Built-in 
Test  (BIT),  Built-in  Test  Equipment  (BITE),  and  Plug-in  Test  Equipment  (PITE) . 
This  equipment  provides  both  diagnostic  and  prognostic  capabilities,  modularity, 
redundancy,  and  reduced  operating  stress  levels  through  use  of  a  microclimatic 
cooling  system  (MCS);  and  application  of  vulnerability  reduction  measures  for 
the  crew  and  critical  (i.e.,  mission  essential)  equipment.  As  part  of 
preplanned  product  improvements,  the  HIP  SPH  design  and  configuration  will 
facilitate  the  installation  of  a  loader-assist  mechanism  and  associated  systems 
(i.e.,  automatic  primer  feed  and  fuze  setting  and  electrical  firing)  to  reduce 
crew  labor  and  increase  rate  of  fire;  installation  of  a  propellant 
compartmentalization  design  which  will  protect  the  crew  and  howitzer  components 
from  the  effects  of  propellant  ignition  caused  by  hostile  fire,  from  shaped 
charge  munitions;  and  provide  for  application  of  the  Enhanced  Position  Locating 
and  Reporting  Systems  User's  Unit,  embedded  encryption,  and  acceptance  of  muzzle 
velocity  from  on-board  velocimeter  through  the  automated  fire  control  system 
(AFCS).  All  product  improved  equipment  will  be  hardened  to  withstand  Nuclear 
Weapons  Effects  (NWE) . 

Tactical  fire  control  will  be  maintained  through  the  GFE  Gun  Control  Unit 
COMBAT  subsystem.  Certain  features  of  the  AFCS  for  the  M109A3E2  are  omitted  in 
accordance  with  IDF- doctrine ,  tactics,  and  anticipated  operational  usage.  These 
include:  on-bo’ard  ballistic  computation,  weapon  drive  servos,  and  secure 

digital  communications.  Weapon  pointing  is  accomplished  using  a  Gun  Orientation 


Navigation  System  (GONS)  or  the  Dynamic  Reference  Unit  (DRU)  of  the  MAPS. 

The  fire  control  system  will  permit  an  emplaced  howitzer,  when  pointed  within  30 

.  'V,  and  fire  virhin  3/seconl  of 

and  oithfn  45  sLoid°''f"  ele  -ations  betveen  -53  mils  and  800  nils, 

ithin  45  seconds  for  elevations  above  800  mils.  High  rates  of  fire  arp 

o^thrL  mechanism  with  capabilities  of  a  burst  rate  of  fire 

for  5hrL  minuLrf  maximum _ cyclic  rates  of  6  rounds  per  minute 

limited  by  tube  themaW  sustained  firing  rates  of  one  round  per  minute 
thermal  car,  •  Conditions.  To  monitor  the  tube  temperature  a  GFE 

creToi  T.  7,  7  ^S  variant  with  displays  provided  Jor  the 

^  j/ .  ,  men  will  advise  the  crew  and  commander  whether  the  fire 

maaion  can  aafaly  be  conpletad  wirhout  exceeding  cube  rherna^  ulTts 

Eli  as  in  the  MlMA3E2°for^r system  using  STE-ICE  and 
providertfrtf  ertf  L  /  replaceable  units  (LRUs)  .  NBC  protettion  is 

si»ilar  to  that  e^lu^Jennder'thrH^Ll^'vSn"^''?"''^""'* 
are  limited  to  natural  shlelHine  reduction  enhancements 

components  a^d  critical  or  vulnerable 

Halon  1301  as  che’^fire  suppressant  '’‘ainguishing  system,  using 

existing  C0„  extinguisher^fn  compartment  and  retaining  the 

equipment  will  be  hardened  r  compartment.  All  product  improved 
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.SECTION  1.  EXECUTIVE  DIGEST 


1.1  SUMMARY 

The  ride  quality  of  the  M923A2  5-ton  cargo  truck,  as  deterained  by  both  the 
exposure  limit  and  absorbed  power  methods,  falls  within  acceptable  limits  for 
all  test  courses  except  Munson  Belgian  Block.  On  this  course,  while  operating 
at  32.2  km/hr  (20  mph) ,  the  absorbed  power  at  the  operator's  seat  exceeded  10 
watts  and  the  ride  was  therefore  considered  unacceptable. 


1.2  TEST  OBJECTIVES 

The  objective  of  this  test  was  to  determine  the  acceleration  levels  at  the 
driver's  position  during  mission  operations  and  to  analyze  the  data  according 
to  ISO  Standard  2631-1978  and  SAE  680091, 

1.3  TESTING  AUTHORITY 
None , 


1.4  TESTING  CONCEPT 

This  test  was  conducted  at  Aberdeen  Proving  Ground,  Maryland  by  the 
Vibration  Test  Branch  of  the  U.S.  Army  Combat  Systems  Test  Activity  in 
accordance  with  SAE  Recommended  Practice  J1013.  The  data  were  analyzed 
according  to  ISO  Standard  2631-1978  and  to  criteria  outlined  in  SAE  report 
680091.  Testing  was  conducted  during  the  period  15  August  to  15  September  1988. 


1.5  SYSTEM  DESCRIPTION 

The  M923A2  cargo  truck  is  a  member  of  the  M939  series  of  5-ton,  6-wheel 
drive  vehicles.  These  vehicles  are  designed  for  use  on  all  types  of  roads, 
highways,  and  cross-country  terrain.  They  also  operate  in  extreme  temperatures 
such  as  arctic  weather  conditions.  The  M939  series  vehicles  are  an  improved 
version  of  the  M809  series.  The  improvements  make  the  M939  series  vehicles  more 
reliable  and  easier  to  operate.  Some  of  the  major  improvements  include  an 
automatic  transmission,  a  three-man  cab,  a  complete  airbrake  system,  a  tilt 
hood,  and  an  hydraulically  operated  front  winch. 


All  M939  and  M939A1  series  vehicles  employ  the  same  250  horsepower  engine. 

The  M939A2  series  vehicles  use  a  smaller,  turbocharged  engine,  also  capable  of 
producing  250  horsepower.  Both  engines  utilize  the  same  automatic  transmission. 
Vehicle  cabs  have  removable  canvas  tops.  All  vehicles  are  equipped  with  a  spare  ^ 
wheel  mounted  at  the  rear  of  the  cab  and  a  pintle  hook  used  for  towing.  The 
M939A2  series  vehicles  are  equipped  with  a  Central  Tire  Inflation  System  (CTIS) 
which  allows  for  greater  tactical  mobility. 


Machine  Description  of  the  W923A2  5-ton 


Manufacturer;  BMY  Division  of  Harsco  Inc.,  York,  Pennsylvania 
Serial  Number:  NLOQ4C 
Weight 

Net . 

Ballast  . 

Gross . 

Weight  Distrb  (Axle  1/2/3) 

Dimensions 


Wheelbase . 455.7  cm  (179.4  in.) 

Track . 206.8  cm  (  81.4  in.) 

Length . 788.7  cm  (310.5  in.) 

Width . 247.4  cm  (  97.4  in.) 

Height . 307.3  cm  (121.0  in.) 


..9860  kg  (21,740  lb) 
..4180  kg  (  9,220  lb) 
14,040  kg  (30,960  lb) 
. 32/33/35  • 


Engine 

Type . Diesel,  Turbocharged,  Intercooled 

Cylinders . 6  (In-Line) 

Brake  Horsepower . 250  Horsepower  At  2100  RPM 

Drivetrain 

Transmission . 5-speed  automatic 


Suspension 

Front . 

Rear . 


Leaf  springs,  oil  shocks 
Leaf  springs ,  oil  shocks 


4 


4 
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c;-r-f-Tnv  I  .  INTRODUCTION? 


1 .1  BACKGROUND 
None. 

1.2  DESCRIPTION  OF  MATERIEL 

The  tested  vehicle  is  a  Bradley  Fighting  Vehicle  (BFV)  with  High 
Sur'.^ivab ility  (HS)  modifications.  These  modifications  include  the  addition  of 
armor  tiles  and  upweighting  the  BFV  to  approximately  27,220  kg  (60,000  lb). 
The  BFV  is.  a  full-tracked  vehicle  powered  by  a  diesel,  V-8 ,  liquid-cooled 
engine. 

1.3  OBJECTIVES 

The  objectives  of  these  tests  were: 

a.  To  determine  the  shock  and  vibration  characteristics  of  the  BFVS-Al  HS 

vehicle  ride  (ride  quality)  for  human  factors  evaluation. 

b.  To  determine  the  shock  and  vibration  environment  that  the  explosive 

armor  tiles  will  be  exposed  to  while  mounted  on  the  BFVS-Al  HS. 

c.  To  evaluate  recently  developed  tie-down  procedures  used  to  secure  the 

Bradley  M2/M3  Al  HS  vehicles  to  a  wooden  deck  rail  flatcar  equipped  with 

standard  draft  gears. 

1.4  SCOPE 

The  Vibration  Test  Branch  of  the  D.S.  Army  Combat  Systems  Test  Activity 
(USACSTA)  was  responsible  for  instrumenting  the  Bradley,  conducting  the  tests, 
and  acquiring  and  processing  all  test  data.  Rail  impact  and  ride  quality 
testing  was  conducted  on  the  Bradley  from  20  April  to  10  July  1987. 


Appendix  C 


FORTRAN  Source  Code 
Program 

Program 

Program 

Program 

Program 

Program 

Program 

Program 

'Program 

Program 

Program 

Program 

Program 

Example 


for  Analysis  Programs 
FILTV2 . FOR 

BIODYN.FOR 

CREST3 . FOR 

IMPULSE . FOR 

ISO. FOR 

SPECF . FOR 

APPEND . FOR 

MULTIXY.FOR 

SHOCK . FOR 

SNIP_GAUSSIAN . FOR 

ADDXY.FOR 

RAMP . FOR 

TOUSA.COM 

Batch  File 


The  above  programs  are  also  supplied  on  IBM-PC 
compatible  3.5"  disc  which  have  been  sent  to: 

U.S.  Army  Aeromedical  Research  Lab 
Attn:  SGRD-UAD-IV  (Major  Butler) 

Fort  Rucker,  AL  U.S. A. 

36362-0577 


Program 


FILTV2 .FOR 


% 


¥ 
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PROGRAM  nLTV2 


begin  {doc} 

C'^cJti*itc*:t:t!^i^f^t**^i:t:iHc**:^liiti':^*:li^cm********************************************** 


»♦»♦♦♦♦♦♦♦♦♦:»*♦  I  I  I  I  I 


-H-++++++++++- 


I  I  ,  ^»:t*************************** 


PROGRAM  FILTV2 


^****itc:tc»*:|c»*********  ********** 

^*********** ****************** 
.***************************** 


^  ***************_j_ 

Q***************^ 

' ♦**************^ 

***************  I  I 

Q*********************************************************************** 

r'*  * 


H  +  M  I  I  I  I  M  I  I -H-++4-++++4-4 


***************************** 


Program  Summary 

* 


-  *  Bandpass  filtering  according  to  British  Standard  6841  by  FFT 
C*  OR  ISO  2631^ 

*  Program  Description 

r* 

:  ^  Performs  frequency  weighting  or  filtering  according  to 

^  *  user  specified  input  The  options  available  are  British 

C*  Standard  6841,  x,y,2  ISO  standard  2631  x,y,z  or  no  weighting. 

^  See,  Handbook  of  Human  Vibration,  M.  Griffin  (1990). 

C*  The  series  is  resampled  to  satisfy  the  2**K  requirement 

of  the  FFT.  The  FFT  is  performed  and  the  spectrum  is  operated 
•'  on  by  the  appropriate  transfer  function  or  frequency  weighting.  * 
u*  The  inverse  FFT  is  then  performed  and  optionally  the  resultant 
C*  filtered  series  is  resampled  to  its  original  size. 

C*  Definition  of  GEDAP  Data  Files 
* — - _ _ _ _ _ * 

* 

C*  INPUT_FILE_1  -  Time  series 


* 

C*- 

♦ 

c* 

¥ 

¥ 

c* 

n* 


* 


* 

¥ 


c*- 

* 

c* 

* 

♦ 

s,- 

* 


OUTPUT_FILE_l  -  Filtered  time  series 


- ♦ 

Definition  of  Conversational  Input  Data  ( Unit  =  LUCIN ) 

NUMBER_OF_CYCLES  -The  number  of  program  cycles 
( if  negative  test  options  are  enabled) 

IFIKH  -filter  option 

0  -  Wb  z-axis  British  Standard  6841 

1  -  Wd  X  and  y-axis  British  Standard  6841 

2  -  ISO  2631  z-axis 

3  -  ISO  2631 X  and  y-axis 

4  -  no  filtering 

_ ♦ 

IRESAM  -resampling  option  switch 

0  -  Filtered  series  will  be  resampled,  i.e.  output 
series  will  have  the  same  sample  spacing  and 
record  length  as  input  series 
1  -  Filtered  series  will  not  be  resampled 


IFORR  -  Output  option  switch  ( must  be  enabled  by  setting 


* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

♦ 

* 

* 
* 
* 
♦ . 
* 

* 

* 

* 

♦ 

* 

* 

* 

■* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 
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NOCYC  negative) 


* 

* 


r‘ 

I  ‘  0  -  GEDAP  input  file 

C*  1  -  filtered  white  noise  output  file,  frequency  domain  * 

r'*  2  -  filtered  white  noise  output  file,  ume  domain 

'  "  3  -  GEDAP  input  file,  frequency  domain 

*  (Note:  frequency  domain  -  amplitude  spectrum) 

C* 


■ 

end {doc} 

* 

* 

c* 

GEDAP  Procedure  File  Example 

* 

. * 

* 

$  ON  ERROR  THEN  EXIT 

* 

c* 

SRUNFILTV 

* 

lit 

1 

!  No  of  cycles 

* 

* 

INPUT  FILE  1 

!  time  series 

* 

c* 

OUTPUT  FILE  1 

!  filtered  time  series 

* 

-  * 

1 

!  British  Standard  Weighting  option 

* 

* 

0 

!  resampling  option 

* 

c* 

$EXIT 

* 

r* 

* 

!  1= _ 

_ ♦ 

GEDAP  Header  Input  Parameters  * 

C* - * 

'  *  * 


*  N  -The  number  of  elements  in  the  input  series 

C*  DEL  -The  intersample  spacing  of  the  series 

SCFI  -The  common  scale  factor  for  integer  data 

*  FP  -Peak  frequency 

C*  FPD  -Peak  frequency  delft 

r* 

*  - ♦ 

External  Subroutines  and  Functions  Called 

C* _ * 

♦ 

*  FILTV2LIB  -  British  Standard  6841  filtering  routine 
C*  -  ISO  weighting 


* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 


c*  Program  compiling  * 

:*  * 

w*  @F12  -  creates  object  and  listings  -  FLlis  * 

C*  * 

* _ ♦ 

Program  Linking  on  VAXATvlS  * 

C* - ♦ 

*  @FILTV2.LNK  * 

♦ 

_ ♦ 

*  Report  any  Bugs  in  this  Space  ♦ 

C*  ♦ 

:*  ♦ 

:*  ♦ 

C*  ♦ 

'■'*  * 

J*  Program  Development  History  * 

2* _ ♦ 

♦ 
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nr  n  )  ( j(  j  -  -')0(  '  r:)r 


r*  Program  Creation  Date  and  Author: 

(  '  Version  1.0-27  NOV  1991  -  FUtv2 

*  -  George  Roddan,  BC  Research 


H^****7^::t^^iH:^L:^^i*:t:*l|Cltf^i*^^:^tc^^i:ts^i*;^i:is:t::t‘*****************m*********************** 


Program  Modi:'  ions: 
Version  Dale 


Author/Firm 


Description 


Module  #1  ♦** 

***  Parameter  Statements  for  User  Constants  and  Array  Dimensions  *** 


IMPLICIT 


NONE 


INTEGER*4  LIMA 
PARAMETER  ( LIMA  =  262144) 


:(c  s(. :)( 5j.  *  j„  jj.  j(,  ^  j(.  ^  3^  ^  ^  ^  ^  jj.  ^  ^  ^  ^  ^  jjj  jjj  ^  5^  j|j  5jj 

'**  _  _  Module  #2  *♦***♦*♦ 

•'**  Explicit  Type  Declarations  for  all  Variables  and  Arrays  ******** 


INTEGER*4  LUCIN.  LUCOUT,  LULIST,  ISTATUS 

INTEGERS  NUMBER_OF  CYCLES,  I  CYCLE,  N1 1,  N22 
REAL*4  VERSION  NUMBER 

CHARACTER*32  PROGR'^.NAME 

INTEGER*4  I,  lER,  lERR,  IFIL,  MRH,  EFORR,  IRESAM,  ITREND,  N 

RE  AL*4  A,  DEL,  DME  AN,  FL,  FP,  FPD,  FTl ,  FT2,  FU,  HWIN 

REALM  TR,TREND1,TREND2,X1,SUM,SMEAN 

REAL*8  A0,A1,A2 

COMPLEX  C,  CHWIN 

CHARACTER*16  DATA.X,  DATA_Y,  UNTTS.X,  UNTTS.Y 


LOGICAL 


INVALID 


DIMENSION  ACLIMA),  C(LIMA/2),  CHWIN(LIMA/2),  HWIN(LIMA) 

2******************************************************************^^:^** 
''***  Module  #3  **************************************** 

***  Initialize  GEDAP  System  ♦♦♦♦♦♦*♦*♦♦♦♦♦♦♦***♦♦♦♦**♦*♦♦***♦***♦**♦ 

PROGRAM.NAME  =  ’FILTV2’ 

VERSION  NUMBER  =  1.0 

CALL  OPEN_GEDAP_NOLIST  ( PROGRAM.NAME,  VERSION_NUMBER 
+  LUCIN,  LUCOUT ) 


Obtain  the  Number  of  Program  Cycles 


NUMBER_OF_CYCLES  =  1 

CALL  PAR_INTEGER_DEFAULT  (’number  of  program  cycles  [1]’, 


+ 


NUMBER_OF_CYCLES ) 


^***!t:******************************************************************* 

Q***  Module  #4  *************»******:(t** 


***  Open  GEDAP  Input  and  Output  File  Streams 


c 

CALL  PRINT_MESSAGE  (  ”  ) 


CALL  OPEN_INPUT_FILE_STREAM  ( 1,  ’input  file  containing’// 

*  +  ’  time  series’JSTATUS ) 

IF  (ISTATUS  .NE.  0)  CALL  CLOSE_GEDAP  ( ISTATUS  ) 

CALL  PRINT_MESSAGE  (  ”  ) 

CALL  OPEN_OUTPUT_FILE_STREAM  ( 1 ,  ’output  file  containing’// 
+  ’  filtered  time  series’,  ISTATUS  ) 

IF  aSTATUS  .NE.  0)  CALL  CLOSE.GEDAP  ( ISTATUS  ) 


CALL  PRINT  MESSAGE  (  ”  ) 
r  -  K  j 

•♦♦****♦♦:|c♦*♦♦*♦*♦*************************K^****J(c**;(I!)t!^t♦!(:**:(c***♦***^(t***♦* 

C***  Module  #5  ******** 

Q***  Read  Conversational  Input  Data  using  PAR_xxx  Subroutines  ******** 

'**************}tc****^i^HHHc^HHiilt*************************:tf***:t::t!**4HH:^:^i^^:^Hi^ 

c* - ♦ 


y  Enter  Frequency  Weighting  as  per  British  Standard  6841 

y - * 


INVALID  =  .TRUE. 

DO  WHILE  (INVALID) 

CALL  PRINT_MESSAGE  (’British  and  ISO  Weighting  Options:  ’) 
CALL  PRINT.MESSAGE  (’  0-Wb  (z-axis)’) 

CALL  PRINT_MESSAGE  Cl-  Wd  (x  and  y-axis)’) 

CALL  PRINT.MESSAGE  (’  2  -  ISO  (z-axis)’) 

CALL  PRINT.MESSAGE  (’  3  -  ISO  (x  and  y-axis)’) 

CALL  PRINT.MESSAGE  (’  4  -  no  filtering’) 

CALL  PAR.INTEGER  (’Weighting  Option’,  IFIRH ) 

IF  (IFIRH.LT.0  .OR.  IFIRH.GT.4)  THEN 

CALL  PRINT.MESSAGE  (’  Invalid  weighting  option  ’) 

J 

INVALID  =  .FALSE. 

ENDIF 
END  DO 


CALL  PRINT.MESSAGE  (  ”  ) 


C*  Enter  output  sampling  option  .  * 

C* - * 


INVALID  =  .TRUE. 

DO  WHILE  (INVALID) 

CALL  PRINT.MESSAGE  (’  RESAMPLING  OPTION  -  ’) 

CALL  PRINT.MESSAGE  (’  IF  0,  SAMPLE  SPACING  OF  OUTPUT  =’// 
+  ’  SAMPLE  SPACING  OF  INPUT’ ) 

CALL  PRINT.MESSAGE  (’  IF  1,  SAMPLE  SPACING  OF  OUTPUT’// 

+  '  ’  CONTROLLED  BY  FFT’) 

IRESAM  =  0 

CALL  PAR.INTEGER.DEFAULT  (’resampling  option  [0]’,  IRESAM  ) 

IF  (IRESAM.LT.0  .OR.  IRESAM.GT.l)  THEN 


CALL  PRINT_MESSAGE  (’Invalid  resampling  option’) 
ELSE 

INVALID  =  .FALSE. 

ENDIF 
END  DO 

CALL  PRINT_MESSAGE  (  ”  ) 


♦ 


C 

~  * _ ♦ 

4::4c4:*******i|c*it[****:t!:t;4:**:f::*E***************:t:4:**3tE**************!t:’|i  **********  3*1 

C***  START  OF  MAIN  RECYCLING  LOOP  ******* 

r'**:^*:4c:tc9tc3te*««********:4c:4c:tc:tc4c*********4;«**********4c*4:****«:tc*«**3|e3tc3(e*3(e]t:]|e4c*3|c*](c3|: 

* 


LCYCLE  = 1 

DO  WHILE  ( LCYCLE  .LE.  NUMBER_OF_CYCLES  ) 


j********:***i(c:(.*:(t******************************************************** 

C***  Module  #6  ♦♦♦*♦♦**♦♦♦*♦♦**♦♦♦****♦♦♦***** 

-'***  Rggj  GEDAP  Input  File  ******************************* 

c 

CALL  READ_GEDAP_1  ( 1,  LIMA,  DEL,  XI,  N,  A,  DATA_X,  UNTTS.X, 

+  DATA_Y,  UNITS  Y,  ISTATUS  ) 

IF  aSTATUS  .NE.  0)  CALL  CLOSE.GEDAP  ( ISTATUS  ) 

C 


* _ * 

^***  USER  CODE  STARTS  HERE 


c*  Remove  mean  (always  done)  * 

C*  * 


2222  CONTINUE 


SUM=0. 

DO  1=1, N 

SUM=Aa)+SUM 
END  DO 
SMEAN=SUM/N 

DO  1=1, N 

A(I)=Aa)-SMEAN 
END  DO 


* _ _ _ ♦ 

C*  * 

APPLY  FREQUENCY  WEIGHTING  AS  PER  BRITISH  STANDARD  6841 
*  * 

C* - * 

c 

CALL  FLTV(LUCOUT,  A,C,NTIM  ATL  JTJ,DEL,FT1  TT2,IRES  AM,IFIRH, 

+  HWIN,CHWIN,IFORR,IER) 

C 


'  Throw  away  first  and  last  2%  of  record  to  avoid  filter  end  effects  * 

^*********************************************«**,|;  :|c:)c  ,1c  :tt*******3tc******:fc 

Nll=  .02*N 
N22=  .98*N 


N=N22-N11+1 
DO  1=1, N 

A(D=Aa+Nll) 
END  DO 


^j*********************************************************************** 
Q***  2^Q(JyJg#7  ******************************* 

'***  Write  Data  to  GEDAP  Output  File  ♦************>^*******=^*****=<=*** 

*********************************************************************** 


Store  Parameters  in  GEDAP  Output  File  Header 
r 


C  Write  GEDAP  Output  File 
% 


CALL  WRITE_GEDAP_1  ( 1,  DEL,  XI,  N,  A,  DATA_X,  UNTTS.X,  DATA_Y, 

+  UNITS  Y,  PROGRAM.NAME,  VERSION.NUMBER,  ISTATUS  ) 

IF  aSTATUS  .NE.  0)  CALL  CLOSE.GEDAP  ( ISTATUS  ) 

C 

p*********************************************************************** 

***  END  OF  MAIN  RECYCLING  LOOP  *********** 
*********************************************************************** 

C* 

I_CYCLE  =  I  CYCLE  +  1 
END  DO 
C 

n*********************************************************************** 

'***  Module  #8  ******************************* 

o***  Close  GEDAP  and  Terminate  Program  ******************************* 
(^*********************************************************************** 

I 

CALL  CLOSE_GEDAP  ( 0 ) 

CALL  EXIT 
END 

\ 

C 

n 


SUBROUTINE  FLTV  ( LUE,A,CJ^,LIMA,Fl,F2T)T,Fri,FT2JRESAM, 
.IFIRH,HWIN,CHWIN,IFORR,IER) 


Q*********************************************************************** 


***************^ 

Q***************^ 

f'*^*************^ 


^***************************** 
SUBROUTINE  FLTV  4.***************************** 

_^***************************** 


*********************************************************************** 


'*  SUBROUTINE  SUMMARY 


'*  This  routine  performs  filtering  or  weighting 
C*  of  an  input  time  series  using  a  frequency  window  technique. 
r* 
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SUBROUTINE  DESCRIPTION 


C* 

r'* 

'♦ 

C* 

C* 

♦ 

c* 

'* 

c* 

r* 

'* 

c* 

!* 

C* 

u* 

C* 

* 

c* 

* 

c*— 
* _ 


1.  Find  TN.  the  length  of  the  wave  train,  and  DF.  the  frequency  * 

step  size. 

2.  Find  K  such  that  N  <  2**K  <  2**N,  where  N  is  the  number  of 

sample  points  in  the  time  series. 

3.  Resample  the  input  array  from  size  N  to  size  NK 

where  NK  =  2**K. 

4.  Determine  the  appropriate  weighting  function. 

ie.,  according  to  British  Standard  6841 

5.  Perform  a  real  to  complex  FFT  on  A,  with  the  result 

being  in  C. 

6.  Calls  the  specified  weighting  subroutine  to  filter  the 

complex  frequency  series  C. 

7.  Perform  a  complex  to  real  FFT  on  C,  with  the  result 

being  in  A. 

8.  Optionally  perform  resampling  on  the  filtered  wave  train. 

U  resampling  is  not  performed,  then  reset  DT  and  N. 

9.  Return  to  main  program. 

_ * 

INPUT  PARAMETERS 

_  _ _ * 


C* 

J* 

'* 

■* 

* 

* 

* 


'* 

'* 


LUE  -  logical  unit  number  for  output 
A  -  input  time  series  to  filtered 

C  -  dummy  complex  array  used  for  working  storage.  It  should  * 
be  equivalenced  in  the  main  program  to  the  array  A. 

N  -  number  of  elements  of  input  time  series  A 

LIMA  -  dimensioned  size  of  the  array 

FI  -  lower  cutoff  frequency  in  Hz 

F2  -  upper  cutoff  frequency  in  Hz 

FTl  -  lower  transition  frequency  band 

FT2  -  upper  transition  frequency  band 

DT  -  intersample  spacing  of  input  time  series  A,  in  seconds  * 

IRESAM  -  switch  which  controls  resampling  option 

IFIRH  -  filter  option  switch 

HWIN  -  ema  array  where  the  hamming  window  coefficients  are 
stored  for  the  hamming  filler  routine 
CHWIN  -  complex  working  array  of  hamming  window  coefficients 
IFORR  -  output  debug  option 


*. 


.* 


■*  OUTPUT  PARAMETERS 
'♦ _ : _ ♦ 


* 


*  A  -  filtered  time  series 

*  N  -  number  of  elements  of  input  time  series  A 

*  DT  -  intersample  spacing  of  filtered  time  series 

*  LUE  -  retained  to'maintain  calling  sequence 

* 


* 


* 

♦ 

♦ 

♦ 

♦ 

♦ 

♦ 

* 

* 

♦ 

* 

♦ 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

♦ 

* 

* 

* 

* 

* 

♦ 

* 

* 

* 

* 

* 

* 

* 

* 
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LOCAL  VARIABLES 


♦A 


-  length  of  wave  train  (N*DT) 

-  frequency  step  size  (1/TN) 

-  the  size  of  the  resampled  time  series.  NK  must  be  a 

power  of  two  and  satisfy  the  conditions 
NK  <=  LIMA 
NK>=N 


SUBROUTINES  CALLED; 


EQUIV_CMPLX_TO_REAL  -  converts  COMPLEX  to  REAL»4,  REAL*4 

EQUIV_REAL_TO_CMPLX  -  converts  ( REAL*4,  REAL*4 )  to  COMPLEX 

FBRIT  -  filters  a  complex  frequency  array  using  one 
of  the  seven  frequency  weights  specified  in 
British  Standard  6841 

FCOEF  -  converts  a  complex  frequency  array  into  a  real 
frequency  array 

FFTCM  -  complex  to  real  scale  and  reorder 
FFTEM  -  complex  to  complex  FFT 
FFTRM  -  real  to  complex  scale  and  reorder 
ESIZN  -  resamples  an  array  to  a  desired  larger  size 
TWLOG  -  finds  NK  such  that  the  conditions  are  satisfied 


'.*  Programmed  by:  D.  Loewen  and  E,  Funke  * 

Z*  For  Hydraulics  Laboratory  * 

Z*  National  Research  Council  * 

Ottawa  * 

:*  April  1983  * 

'*  Version  1.0  * 

'*  * 


Subroutine  Modifications: 


Version 

1.0 


Date 

27  NOV  1991 


Author/Firm 
George  Roddan 
BCR 


Converted  to  VAXTVMS  Version  2  8  Dec  1987 


Description 
Frequency  Weighting 
Brit  Stan.  6841 

_ ♦ 

Tyson  Haedrich/NRC 


Q^i^:^^***-***************************************************************** 

—1 

IMPUCIT  NONE 
C 

INTEGERM  lER,  IFIRH,  IFORR,  IRESAM,  K,  LIMA,  LUE,  MK,  N,  NK 

\ 

REALM  A.DF,DT,F1,F2.FTLFT2,HWIN,TN 
C 

COMPLEX  C,  CHWIN 


DIMENSION  A(LIMA),  C(LIMA/2),  CHWIN(LIMA/2),  HWIN(LIMA) 
C 

C*  Find  the  length  of  the  wave  train  and  the  frequency  step  size 

TN  =  N*DT 
DF=1/TN 

’*  Find  K  such  that  N<2**Kc2*N 
C 

CALL  TWLOG(N,262144,K,NK) 

IF  (2*N  .EQ.  NK)  THEN 
NK  =  N 
K  =:K-  1 
ENDff 

IF  (NK  .GT.  LIMA)  THEN 

CALL  ERROR_MESSAGE  (l,2,’FLTA’,’Resampled  time  series’// 

+  ’  larger  than  array  A’,’  ’) 

CALL  CLOSE_GEDAP  ( -1  ) 

ENDIF 

n 

■*  Resample  the  input  array 

c 

CALL  ESIZN(A.N,NK) 


J*  Perform  real  to  complex  FFT  on  A 
C 

MK  =  K - 1 

I 

CALL  EQUIV_REAL_TO  CMPLX  ( A,  C,  LIMA ) 
C  ~ 

CALL  FFTEM(C,MK,-1) 

CALL  FFrRM(C,NK) 

C 

CALL  EQUIV_CMPLX_TO_REAL  ( A,  C,  LIMA ) 


C*  Weight  the  complex  frequency  array  using  the  user  specified 
filter  weighting. 

C* - ♦ 

c 

CALL  EQUIV  REAL  TO^CMPLX  (  A,  C,  LIMA ) 
CALL  FBRIT(LUE,CL>Fd^K,IFIRH,IER) 

CALL  EQUIV_CMPLX_TO  REAL  (  A,  C,  LIMA ) 


C*  Perform  a  complex  to  real  FFT  on  C 

_ * 


* 


* 


CALL  EQUIV  REAL  TO.CMPLX  ( A,  C,  LIMA ) 
r 

CALL  FFTCM(C,NK) 

CALL  FFTEM(C.MK,1) 

C 

CALL  EQUIV_CMPLX_TO_REAL  ( A,  C,  LIMA ) 


C* - ♦ 

Optionally  perform  resampling  on  resultant  wave  train.  If 
resampling  not  perfoimed  then  reset  DT  and  N 
•* _ ♦ 


* 
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IF  (IRESAM  .EQ.  0)  THEN 


un 


CALL  ESIZN(A,NK,N) 

ELSE 

DT  =  TN/NK 
N  =NK 
ENDIF 

RETURN 

*********************************************************************** 

END 

**********t*****:t:**^ilft************************************************* 


!  DEC/CMS  REPLACEMENT  HISTORY,  Element  nLTA.FOR 
!  *2  24-MAR-1989  13:52:45  SYSTEM  "" 

26-JAN-1988  08:20:53  SYSTEM  "Low, high  or  bandpass  filter  by  FFT" 
!  DEQCMS  REPLACEMENT  HISTORY,  Element  FILTA.FOR 


•*★**  Program  FILTV2LIB.for 


:**************************** 

k ************************** ****** 


C  Subroutine  library  for  the  program  FILTV2 
C 

,  r*************************************** ******************* *********** 

********************************************************************* 

C 


Converted  to  GEDAP  Version  II 

c -  - - - 

r 

V— _ _ _ — - — — - * 


C 

SUBROUTINE  FBRIT  (LUE,C,DELF,NK,IFIRH,IER) 


C*********************************************************************** 


'^’■^★★★ilr**********  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  [  I  I  I  I  I  I  ***************************** 
.  •**************+  +**********★****************** 

SUBROUTINE  FBRIT  +***************************** 

C***************^  +***************************** 

r************** I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  ***************************** 
r*** ******************************************************************* 


C*  * 

~V__ _ _ _ _  - -  - . — .  I  -* 

‘  SUBROUTINE  SUMMARY  * 

C*-— - - — — — — - * 

r*  * 

^  SELECT  FREQUENCY  WEIGHTING  AND  FILTER  IN  THE  FREQUENCY  DOMAIN  * 
v.-*  ACCORDING  TO  BRITISH  STANDARD  6841,  or  ISO.  * 

C*  * 

fc  ■■  ....  _ _ _ ■■  I  . —  .* 


'f 

C*- 

^* 

* 

i_* 

c* 

* 

_*. 

c* 

k 

c* 

r* 

* 

^* 

c* 

* 


SUBROUTINE  DESCRIPTIOI; 


BASICALLY  PERFORMS  BAND-PASS  FILTERING  IN  THE  FREQUENCY  DOMAIN 

Coitpile  instructions  -  @F22  -  then  this  is  linked  to  FILTV2 

using  @filtv2.1nk 

INPUT  PARAMETERS 


LUE  -  logical  unit  number  for  error  messages 

C  -  complex  frequency  array  (of  A),  to  be  filtered 

DELF  -  intersanple  spacing  of  the  freqency  array 

NK  -  number  of  elements  in  the  resanples  array  A 

IFIRH  -  integer  code  which  determines  which  weighting  function 


* 

.* 

* 

* 

* 

* 

* 

.* 

* 

.* 

* 

* 

* 

* 

* 

* 

* 


*. 

C* 

* 

^* 

^* 

* 

-*- 

^* 

'*- 


OUTPUT  PARAMETERS 


lER  -  an  error  indicator 

C  -  filtered  frequency  array 


LOCAL  VARIABLES 


.* 

* 

.* 

* 

★ 

* 

* 

.ic 

★ 


NK 


-  number  of  elements  in  the  complex  freq.  array  C 


* 

ll^ 


SUBROUTINES  AND  FUNCTICWS  CALLED: 


Subroutine  Creation  Date  and  Author: 
Version  1.0  -  28  Nov.  1991 

-  George  Roddan,  BC 


Subroutine  Modifications: 


c* 

Version 

Date 

Author/Firm 

★ 

;* 

1.0 

9  Dec  1991 

George  Roddan/bcr 

★ 

2.0 

3  Feb  1992 

George  Roddan/bcr 

★ 

C* 

2.5 

23  Jul  1992 

George  Roddeui/bcr 

it 

it 

* 

Description: 

This  module  has  been  updated  to  reflect  the 

* 

u* 

current  GEDAP  program 

standards. 

* 

IMPLICIT  NONE 

INCLUDE  'G2$:GGP.FOR' 

CHARACTER*32  FILTER_TyPE 

INTEGER*4  I,  IFIRH,  lER,  LUE,  Nl,  N2,  N3,  N4,  NK,  NKH,NlMAX 
XNTEGEIR’^  4  N5 

REAL*4  DELF,  Al,  Bl,  Cl,  Dl,  El,  Gl,  FTl,  FT2,  PI 

REAL*4  FI,  F2,  F3,  F4,  F5,  F6,  Ql,  Q2,  Q3,  Q4,  K,  W 

REAL*4  TPI,  FPI,  H 

COMPLEX  C,  Hb,  Hi,  S,  Zl,  Z2,  Z3,  Z4 

N5-GGP$NFFT_MAX/2 

DIMENSION  C( 131072),  Hb( 131072),  Hi (131072) 

DIMENSION  H(  131072) 

^  PARAMETER  (  PI  -  3.141592654  ) 

NKH  -  NK/2  +  1 
TPI  «  2.*PI 
FPI  -  4.*PI**2. 


1*  First  define  the  frequency  weighting  array 

C******************ie******************i************itit**it**ie***it**it*iHH^ 

'2******************  British  Steuidard  z-axis  ************************* 
J**************«**ifr**4r4t4r***************************Ail^**A**A********** 

w 

IF  (IFIRH  .EQ.  0)  THEN 
FI  -  0.4  .  ' 

F2  -  100. 

Ql  •=  0.71 
F3  -  16.0 
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F4  -  16.0 
F5  «  2.50 
F6  «  4.00 
Q2  «  .550 
Q3  >=  0.90 
Q4  =  0.95 
K  -  0.40  , 

FILTER_TYPE  -  '  British  6841  -  z' 

CALL  PUT_C3iAI^CTER_PARAMETER  ( 'FILTER_TYPE' ,FILTER_TYPE) 
GO  TO  50 
ENDIF 


r*******************  British  standard  x  and  y  axis  ****************** 

L. 

IF  (IFIRH  .EQ.  1)  THEN 
FI  -  0.4 
F2  -  100. 

Q1  •  0.71 
F3  -  2.0 
F4  -  2.0 
Q2  »  .630 
K  -  1.0 

FILTER_TyPE  *  '  British  6841  -  x,y' 

CALL  PUT_CHARACTER_PARAMETER  ( 'FILTERJIYPE' ,FILTER_TYPE) 

GO  TO  60 
ENDIF 

C******************************************************************** 

c.***********************  ISO  2— eixis  ********************************* 

•t4t****************4r*A4r******il^**A*ik*****«t***4r******4t***************A* 

IF  (IFIRH  .EQ.  2)  THEN 

FILTER_TYPE  -  '  ISO  2631  -  z' 

CALL  PUT_CHARACTER_PARAMETER  ( 'FILTER_TyPESFILTER_TYPE) 

GO  TO  80 
ENDIF 


2***********************1t********'it****ii**1t***1i1r***************1i*ii1t*1c1i 

A4r4t4r*AA4rilr*  ISO  Xand  y^BXiS  **************************** 

J*****4rA***A***A4r**A**4r4r***4r****4tA***A4r4r***A***4r***4rA**A***A4r*AA**4rA* 

IF  (IFIRH  .EQ.  3)  THEN 

FILTER_TYPE  -  '  ISO  2631  -  x,y' 

CALL  PUT_CHARACTER_PARAMETER  ( 'FILTERJTYPE' ,FILTER_TYPE) 

GO  TO  90 
ENDIF 


*****ic***ic*itikik********ic  fjQ  Filtarin^  ******************************* 

;****************  ******************************************4^*  A4t4r***** 

IF  (IFIRH  .EQ.  4)  THEN 

FILTER_TYPE  »  '  no  weighting' 

CALL  PUT_CHARACTER_PARAMETER  ( 'FILTER_TyPE' ,FILTER_TyPE) 

GO  TO  200 
ENDIF 

****************************************************** A* ************ 

**************  wb  -  Z-axis  British  Standard  Weighting  ************** 


♦ 
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^★******************************************************************* 


dO  do  I  «  1,NKH 

V^TPI *FLQAT ( I ) *DELF 
S=cnf)lx(0.0,W) 

Zl  =  (S  +  TPI*F3)*(S**2  +  (TPI*F5*S/Q3)  +  FPI*F5**2) 
Z2  -  (S**2  +  (TPI*F4*S/Q2)  +  FPI*F4**2) 

Z3  -  (S**2  +  (TPI*F6*S/Q4)  +  FPI*F6**2) 

Z4  -  (TPI*K*(F4**2)*(F6**2)  )/(F3*(F5**2) ) 

c 

Hid)-  (Zl*Z4)/(Z2*Z3) 


END  DO 
GO  TO  70 

•r^****************************************************************** 

V*************  vJb  -  X  and  y-eixis  British  Steindard  Weighting  ******** 

C******************************************************************** 

r 

J  DO  I  -  1,NKH 

W=2*PI*FLOAT( I ) *DELF 
S-cn?)lx(0.0,W) 

Zl  -  S  +  (TPI*F3) 

Z2  -  (S**2)  +  (TPI*F4*S/Q2)  +  (FPI*(F4**2) ) 

Z3  -  TPI  *  K  *  (F4**2)  /  F3 
H1(I)  -  (Z1/Z2)*  Z3 

END  DO 

C 

*r*************  BAND  LIMIT  FILTER  *********************************** 

"0  DO  I  -  1,NKH 

W-2  *PI * FLOAT ( I ) *DELF 
S-cn5)lx(0.0  ,  W) 

Zl  -  (S**2)  *  FPI  *  (F2**2) 

Z2  -  (S**2)  +  (TPI*F1*S/Q1)  +  (FPI*(F1**2)) 

Z3  -  (S**2)  +  (TPI*F2*S/31)  +  (FPI*(F2**2) ) 

Hb(I)  -  Zl  /  (Z2*Z3) 

END  DO 
GO  TO  100 

■^* ***************************************************** ************* 

‘•kitifkitifkitifkititifkitifkii  JgQ  Z~AXiS  ************************************** 

'4r  ***************** A****** A A** A*** A*********************** *********** 

0  DO  I  »  1,NKH 

V^FLOAT{I-l)*DELF 

IF  ((W  .GT.  1.0)  .AND.  (W  .LT.  4.0))  THEN 
H(I)-  .5*(w)**.5 
ENDIF 

*  IF  ((W  .GT.  4.0)  .AND.  (W  .LT.  8.0))  THEN 

H(I)-  1.0 
ENDIF 

IF  ((W  .GT.  8.0)  .AND.  (W  .LT.  100.0))  THEN 
H(I)-  8/W 
ENDIF 

IF  ((W  .LT.  1.0)  .OR.  (W  .GT.  100))  THEN 
H(I)=  0.0 

ENDIF  '  177 

END  DO 
GO  TO  150 


C******************  ISO  X  and  y-Axis  ******************************** 


DO  I  »  1,NKH 

V^FLOATC I-l ) *DELF 

IF  ((W  .GT.  1.0)  .AND.  (W  .LT.  2.0))  THEN 
H(I)«  1.0 
ENDIF 

IF  ((W  .GT.  2.0)  .AND.  (W  .LT.  100.0))  THEN 
H(I)«=  2./1W 
ENDIF 

IF  ((W  .LT.  1.0)  .OR.  (W  .GT.  100))  THEN 
H(I)*  0.0 
ENDIF 

END  DO 
GO  TO  150 


*  Filter  the  signal  in  the  frequency  domain  for  British  Standard  * 

_  _  —  -  -  _  -  -  -  -  -  - * 

00  DO  I-  1,  NKH 

C(I)  =  C(I)*Hl{I)*Hb(I) 

END  DO 
GO  TO  200 


C*  Filter  the  signal  in  the  frequency  domain  for  ISO  Steindard 


150  DO  1=  1,  NKH 

C(I)  -  C(I)  *  H(I) 
END  DO 
c, 

C* - 

00  RETURN 


SUBROUTINE  FCOEF  (A,C,N,NK,DELF,DEL) 


'ir'kiticif’kicific'kifififit'kiticicitidfificisit'kif’kifiticitifitilififififitifirifiticifirickificititititififitifir'k’k'kirifitititif'kic 


Jit  ★*★*★★**★*+ 


SUBROUTINE  FCOEF 


it  it  if  it  it  if  it  it  ir  it  it  if  if  ic  it  if  icit  it  it  it  it  it  it  it  it  it  ^ 
^ititititititirititititititititititititititititititirititit 


SUBROUTINE  SUMMARY 


Subroutine  used  to  convert  a  conplex  frequency  array  into 
'real'  frequency  eirray. 


SUBROUTINE  DESCRIPTICXJ 


Subroutine  used  to  convert  a  con^jlex  frequency  array  into 
a  'real'  frequency  array. 


INPUT  PARAMETERS 


C  -  conplex  frequency  array 

DELF  -  intersarrple  spacing  of  frequency  array 

NK  -  number  of  elements  in  array  C 


OUTPUT  PARAMETERS 


A  -  absolute  value  frequency  array 
N  -  number  of  elements  in  array  A 


SUBROUTINES  AND  FUNCTIOJS  CALLED: 


Subroutine  Creation  Date  and  Author: 
Version  1.0  -  23  Dec.  1983 

-  Don  G.  Smith,  DMR 


Subroutine  Modifications; 


Version 

1.0 


Date 

23  Dec.  1983 


Description;  Original 


22  Jan.  1985 


Author/Firm 
Don  G.  Smith/DMR 


Harold  Chard/DMR 


Description; 


This  module  has  been  updated  to  reflect  the 
current  GEDAF  program  standards. 


_^**************1e********ii**********Tkii***ii******1f1r****it**1t************1t1t 


IMPLICIT 

INTEGER*4 

REAL*4 

COMPLEX 

DIMENSION 

N 

DEL  »  DELF 


NC»JE 
I,  N,  NK 
A,  DEL,  DELF 
C 

A(*),  C(*) 


DO  I  -  1,NK 

A(I)  -  CABS{C{I)) 
END  DO 


RETURN 


Program 


BIODYN.FOR 
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PROGRAM  BIODYN 


begin {doc} 


*★★*★*★**★★★★**■)  Mil  I'+H  I  I  M ++ I  I  I  I  I  I  I  t+'^l  I  ***************************** 
-***************+  +***************************** 

C********iir******+  PROGRAM  BIODYN  +****★************************ 

C***************+  +***************************** 

****************1  I  I  I  I  1  + I  I  I  I  I  M  H  I  I  I  I  M  I  I  M  I  ***************************** 
*********************************************************************** 


PROGRAM  BIODYN 


Program  Summary 


This  program  is  used  to  estimate  \diole-body  vibrations  using  em 
an  idealized  single  degree  of  freedom  mass  spring  damper  system. 


Program  Description 


Performs  frequency  weighting  or  filtering  utilizing  a  single 
degree  of  freedom  model.  The  user  is  queried  for 
which  model  to  use.  The  series  is  resanpled  to  satisfy  the  2**K 
requirement  of  the  FFT.  A  forward  FFT  is  performed  on  the 
the  time  series.  The  resulting  spectrum  is  multiplied  by  the 
appropriate  transfer  function  and  an  inverse  FFT  is  performed 
back  to  the  time  domain. 


Definition  of  GEDAP  Data  Files 


INPUT  FILE  1  -  Time  series 


OUTPUT  FILE  1  -  Filtered  time  series 


Definition  of  Conversational  Input  Data  (  Unit  -  LUCIN  ) 


NUMBERJDFjCYCLES  -The  number  of  program  cycles 

(  if  negitive  test  options  are  enabled) 

IFIRE  -filter  option 

0  -  Payne  Spinal  (DRI) 

1  -  Payne  Visceral 

2  -  Body  Vibration  Model 

3  -  Griffin  &  Fairlea 

IRESAM  -resanpling  option  switch 

0  -  Filtered  series  will  be  resanpled,  i.e.  output 
series  will  have  the  same  saitple  spacing  and 
record  length  as  input  series 
1  -  Filtered  series  will  not  be  resampled 


IFORR  -  Output  option  switch  (  must  be  enabled  by  setting 

NOCYC  negitive) 

0  -  GEDAP  input  file 

1  -  filtered  white  noise  output  file,  frequency  domain 

2  -  filtered  white  noise  output  file,  time  domain 


Program  Modifications: 


Version 


Author/Firm 


Description 


C****** ******************************************** ********************* 

'’***  Module  #1  *** 

r**  Parameter  Statements  for  User  Constants  and  Array  Dimensions  *** 
(_•*********************************************************************** 
C 

IMPLICIT  NC»^E 


INTEGER* 4 
PARAMETER 


LIMA 

(  LIMA  -  262144  ) 


C*********************************************************************** 

r***  Module  #2  ******** 

***  Explicit  Type  Declarations  for  all  Variables  and  Arrays  ******** 

^******4rA**:l^*:f^*4r*************  ******************************************* 

C 

INTEGER*4  LUCIN,  LUCOUT,  LULIST,  ISTATUS 
INTEGER* 4  NUMBER_OF_CYCLES ,  I_CYCLE,  Nil,  N22 

REAL*  4  VERSIC»^_NUMBER 

CHARACTER*32  PROGRAM  NAME 


INTEGER* 4 


I,  lER,  lERR,  IFIL,  IFIRH,  IFORR,  IRESAM,  ITREND,  N 


REAL*4 
REAL* 4 

REAL*8 


A,  DEL,  DMEAN,  FL,  FP,  FPD,  FTl,  FT2,  FU,  HWIN 
TR,  TRENDl,  TREND2,  Xl,  SUM,  SMEAN 

AO,  Al,  A2 


CCWPLEX 


C,  CHWIN 


CHARACTER*16  DATA  X,  DATA  Y,  UNITS  X,  UNITS  Y 


LOGICAL 


INVALID 


DIMENSiai  A(LIMA),  C(  LIMA/2),  CHWIN{  LIMA/2 ) ,  HWIN(LIMA) 

C 

'^***  ************  ***:l^  A****  A  A********************************  ******  ******* 

;***  Module  **************************************** 

(j***  Initialize  GEIDAP  System  **************************************** 
^***************************** ************************** **************** 

♦  PROGRAM_NAME  «  'BIODYN' 

VERSION_NUMBER  -  1.0 

CALL  OPEN_GEDAP_NOLIST  {  PROGRAM_NAME,  VERSION_NUMBER, 

+  LUCIN,  LUCOUT  ) 


Obtain  the  Number  of  Program  Cycles 


NUMBER_OF_CYCLES  -  1 

CALL  PAR_INTEGER_DEFAULT  ('number  of  program  cycles  [1]', 
I-  NUMBER  OF  CYCLES  ) 


^***** ****************************************************** ************ 
C***  Module  #4  *********************** 

C***  Open  GEDAP  Input  and  Output  File  Streams  *********************** 

'**^-4r  ******************************************************  ************* 


) 


CALL  PRINT_MESSAGE  (  '  ' 

CALL  OPEN  INPUT_FILE_STE?EAM  (  1,  'input  file  containing'// 

+  “  '  time  series' ,ISTATUS  ) 

IF  (ISTATUS  .NE.  0)  CALL  CLOSE_GEnAP  (  ISTATUS  ) 

CALL  PRINTJffiSSAGE  (  '  '  ) 

CALL  OPEN_OUTPUT_FILE_STREAM  (  1,  'output  file  containing'// 

+  '  filtered  time  series',  ISTATUS  ) 

IF  (ISTATUS  .NE.  0)  CALL  CLOSE_GEnAP  (  ISTATUS  ) 

CALL  PRINT_HESSAGE  (  '  '  ) 

r********************************************************************** 

'_***  Modvile  #5  ******** 

C***  Read  Conversational  Ir^t  Data  using  PAR_xxx  Subroutines  ******** 

It********************************************************************** 

V 

_ _ _ --  -  _ * 

Enter  Frequency  Weighting  as  per  bio-dynamic  model  * 

; _ _ _ _ _ * 


INVALID  -  .TRUE. 

DO  WHILE  (  INVALID  ) 

CALL  PRINT_MESSAGE  ( 'Bio-dynamic  Modelling  Options:  ') 
CALL  PRINT_MESSAGE  ('  0  -  Payne  -  Spinal  (DRI)') 

CALL  PRINT_MESSAGE  ('  1  -  Payne  -  Visceral') 

CALL  PRINT_MESSAGE  ('  2  -  Body  Vibration  Model') 

C  CALL  PRINT_MESSAGE  ('  3  -  Griffin  &  Fairlea') 

CALL  PAR_INTEGER  ('  Option',  IFIRH  ) 

IF  ( IFIRH. LT.O  .OR.  IFIRH. GT. 3)  THEN 

CALL  PRINT_MESSAGE  ( '  Invalid  weighting  option  ' ) 
ELSE 

INVALID  -  .FALSE. 

ENDIF 
END  DO 


C 

c*. 

:* 

j*. 

C 


CALL  PRINT_MESSAGE  (  '  '  ) 

■ _ ; _ * 

Enter  output  sanpling  option  * 

* 


INVALID  -  .TRUE. 

DO  WHILE  (  INVALID  ) 

CALL  PRINT_MESSAGE  (' 
CALL  PRINT_MESSAGE  {' 

CALL  PRINT_MESSAGE  ( ' 

IRESAM  »  0 


RESAMPLING  OPTION  —  ' ) 

IF  0,  SAMPLE  SPACING  OF  OUTPUT  -'// 
'  SAMPLE  SPACING  OF  INPUT' ) 

IF  1,  SAMPLE  SPACING  OF  OUTPUT'// 

'  CONTROLLED  BY  FFT' ) 


CALL  PAR_INTEGER_DEFADLT  { '  resanpling  option  [0]',  IRESAM  ) 
IF  (IRESAM.LT.O  .OR.  IRESAM.GT.l)  THEN 

CALL  PRINT_MESSAGE  ('Invalid  resanpling  option') 

ELSE 

INVALID  -  .FALSE. 

ENDIF 
END  DO 


* 
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CALL  PRINT  MESSAGE  ( 


f  r 


) 


^* **************************************************** ****************** 
"'**  START  OF  MAIN  RECYCLING  LOOP  ******* 


I_CYCLE  =  1 

DO  WHILE  (  I_CYCLE  .LE.  NUMBER_OF_CYCLES  ) 

^*%********************* ****************************** ****************** 
***  Module  #6  ******************************* 

_***  Read  Data  from  GEDAP  Input  File  ******************************* 

C*********************************************************************** 


CALL  READ_GEDAP_1  (  1,  LIMA,  DEL,  Xl,  N,  A,  DATA_X,  UNITS_X, 
+  DATA_Y,  UNITS_Y,  ISTATUS  ) 

IF  (ISTATUS  .NE.  0)  CALL  CLOSE  GEDAP  (  ISTATUS  ) 


C***  USER  CODE  STARTS  HERE 


c* - — _ - — - - - * 

'■*  Remove  mean  (always  done)  * 

■k  k 

c* — — — - - — — - — * 

C 

2222  CCOTINUE 


SUM=0. 

DO  I»1,N 

SUM=A(I)+SUM 
END  DO 
SMEAN-SUn/N 

_ _ — * 

DO  I-1,N 

A(I)  -  A(I)  -  SMEAN 
END  DO 


C* - — * 

c*  * 

:*  APPLY  FREQUENCY  WEIGHTING  * 

C*  * 

C* _  * 


*  CALL  FLTV(LUC0UT,A,C,N,LIMA,FL,FU,DEL,FT1,FT2,1RESAM,IFIRH, 

+  HWIN,CHW1N,IF0RR,IER) 

^4c***4r  A**  A  A**4c*A*4tA**4t4r*******  ****************************************** 

C  -Throw  away  first  and  last  2%  of  record  to  avoid  filter  end  effects  * 

i^************************************************************* ********** 

Nil-  .02*N 
N22-  .98*N 
N-N22-N11+1 
DO  I-1,N 

A(I)-A(I+N11) 

END  DO 
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3*********************************************************************** 

J2***  Module  ******************************* 

^***  Write  Data  to  GEiDAP  Output  File  ******************************* 

"•***r  ****************************************************************** 


store  Parameters  in  GEDAP  Output  File  Header 


C 


C_ — - - 

C  Write  GEDAP  Output  File 


rAj.r.  WRITE_GEDAP_1  (  1,  DEL,  Xl,  N,  A,  DATA_X,  UNITS_X,  DATA_Y, 

+  UNITS_y,  PROGRAM_NAME,  VERSIC»^_NUMBER,  ISTATUS  ) 

IF  (ISTATUS  .ME.  0)  CALL  CLOSE_GEDAP  (  ISTATUS  ) 

C 

-^★A********************************************************************* 

>**  end  OF  MAIN  RECYCLING  LOOP  *********** 

C*********************************************************************** 

C* 

I_CYCLE  »=  I_CYCLE  +  1 
END  DO 
C 

^*********************************************************************** 

;***  Module  #8  ******************************* 

C***  Close  GEDAP  and  Terminate  Program  ******************************* 
r* **************************** ****************************************** 

CALL  CLOSE_GEDAP  (  0  ) 

CALL  EXIT 
END 


SUBROUTINE  FLTV  (  LUE,A,C,N,LIMA,F1,F2,DT,FT1,FT2,IRESAM, 
. IFIRH,HWIN, CHWIN, IFORR, lER) 


C*********************************************************************** 
^*************** I  I  t  I  (  I  I  I  I  M  I  I  I  I  I  I  I  I  I  I  I  I  t  t  t  ^  ***************************** 
J***************+  +***************************** 

C***************+  SUBROUTINE  FLTV  +***************************** 

C***************+  +***************************** 


;;***************, n  +  i-t  I  t  >m(  h  >■***************************** 

C*********************************************************************** 


C*  * 

^* _ _ — ■ — ^ — - — - — ..  * 

:*  SUBROUTINE  SUMMARY  * 

C* - — * 

C*  * 

:*  This  routine  performs  filtering  or  weighting  * 

C*  of  an  input  time  series  using  a  frequency  window  technique.  '  * 
C*  * 

;* _ _ _ _ _ _ * 

C*  SUBROUTINE  DESCRIPTION  * 

C* - * 

:*  * 

:*  1.  Find  TN,  the  length  of  the  wave  train,  and  DF,  the  frequency  * 

C*  step  size.  * 

c*  * 

:*  2.  Find  K  such  that  N  <  2**K  <  2**N,  where  N  is  the  number  of  * 

C*  saitple  points  in  the  time  series.  * 

C*  _  * 

r*  3.  Resanple  the  input  array  from  size  N  to  size  NK  * 
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vrfiere  NK  ■=  2**K. 


4.  Determine  the  appropriate  weighting  function, 
ie.,  according  to  British  Standard  6841 

5.  Perform  a  real  to  conplex  FFT  on  A,  with  the  result 
being  in  C. 

6.  Calls  the  specified  weighting  subroutine  to  filter  the 
conplex  frequency  series  C. 

7.  Perform  a  conplex  to  real  FFT  on  C,  with  the  result 
being  in  A. 

8.  Cptionally  perform  resairpling  on  the  filtered  wave  train. 
If  resaitpling  is  not  performed,  then  reset  DT  euid  N. 

9.  Return  to  main  program. 


INPUT  PARAME7IERS 


LUE  -  logical  omit  number  for  output 
A  -  input  time  series  to  filtered 

C  -  dummy  conplex  array  used  for  working  storage.  It  should 
be  equivalenced  in  the  main  progreun  to  the  array  A. 

N  -  number  of  elements  of  input  time  series  A 

LIMA  -  dimensioned  size  of  the  array 

Fl  -  lower  cutoff  frequency  in  Hz 

F2  -  upper  cutoff  frequency  in  Hz 

FTl  -  lower  transition  frequency  band 

FT2  -  upper  transition  frequency  band 

DT  -  intersanple  spacing  of  input  time  series  A,  in  seconds 
IRESAM  -  switch  \rtiich  controls  resanpling  option 
IFIRH  -  filter  option  switch 

HWIN  -  eina  array  where  the  hamming  window  coefficients  are 
stored  for  the  hamming  filter  routine 
CHWIN  -  conplex  working  array  of  hamming  window  coefficients 
IFORR  -  output  debug  option 


OUTPUT  PARAMETERS 


-  filtered  time  series 

-  number  of  elements  of  input  time  series  A 

-  intersanple  spacing  of  filtered  time  series 

-  retained  to  maintain  calling  sequence 


LOCAL  VARIABLES 


~  length  of  wave  train  {N*DT) 

-  frequency  step  size  (l/IN) 

-  the  size  of  the  resanpled  time  series.  NK  must  be  a 
power  of  two  and  satisfy  the  conditions 

JJK  <-  LIMA 
NK  >«  N 


SUBROUTINES  CALLED: 


c* 

c* 

’* 

c* 

'it 

c* 

c* 

r* 

c* 

'* 

c* 

r* 

;* 

C* 

C* 

’* 


c* 

A 

z* 

Programmed  by;  D.  Loewen  and  E.  Funke 

A 

I* 

For  Hydraulics  Laboratory 

A 

c* 

National  Research  Council 

A 

c* 

Ottawa 

it 

> 

April  1983 

A 

Jit 

Version  1.0 

A 

c* 

★ 

:* 

c* 

Subroutine  Modifications; 

it 

it 

r* 

it 

r* 

Version  Date  Author/Firm 

Description 

* 

c* 

1.0  27  NOV  1991  George  Roddan 

Frequency  Weighting 

A 

c* 

BCR 

Brit.  Stan.  6841 

A 

_ A 

2* 

c*- 

Converted  to  VAX/VMS  Version  2  8  Dec  1987 

lyson  Haedrich/NRC 

A 

..A 

C*  * 

2*********************************************************************** 


EQUIV_CMPLX  TO_REAL  -  converts  CC»IPLEX  to  REAL* 4,  REAL* 4 

EQUIV_REAL_TO_CMPLX  -  converts  (  REAL* 4,  REAL* 4  )  to  CX)MPLEX 

FBRIT  -  filters  a  complex  frequency  array  using 
a  specified  transfer  function 

FCOEF  -  converts  a  conplex  frequency  array  into  a  real 
frequency  array 

FFTCM  -  conplex  to  real  scale  and  reorder 

FFTEM  -  complex  to  coirplex  FFT 

FFTRM  -  real  to  complex  scale  and  reorder 

ESI2N  --  resanples  an  array  to  a  desired  larger  size 

TWLOG  -  finds  NK  such  that  the  conditions  are  satisfied 


* 

* 

* 

* 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 

A 


c 


c 


r 


c* 


IMPLICIT 

INTEGER*4 

REAL*4 

COMPLEX 

DIMENSION 


NONE 

lER,  IFIRH,  IFORR,  IRESAM,  K,  LIMA,  LUE,  MK,  N,  NK 
A,  DF,  DT,  Fl,  F2,  FTl,  FT2,  HWIN,  IN 
C,  CHWIN 

A(LIMA),  C(LIMA/2),  CHWIN( LIMA/2 ) ,  HWIN(LIMA) 


Find  the  length  of  the  wave  train  and  the  frequency  step  size 


OU  «  n*DT 
DF  -  I/IN 

Find  K  such  that  N  <  2**K  <  2*N 
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Z* 

C 


CALL  IWLOG(N, 262144, K,NK) 
IF  (2*N  .EQ.  NK)  THEN 


NK  *=  N 
K  =  K  -  1 
ENDIF 

IF  (NK  .GT.  LIMA)  THEN 

CALL  ERROR_MESSAGE  (1,2, 'FLTA' , 'Resaitpled  time  series'// 
+  '  larger  than  array  A' , '  ' , '  ’ ) 

CALL  CLOSE_GEnAP  (  -1  ) 

ENDIF 

Resaitple  the  input  array 
CALL  ESIZN(A,N,NK) 

Perform  real  to  conplex  FFT  on  A 
MK  -  K  -  1 

CALL  EQUIV_REAL_TO_CMPLX  (  A,  C,  LIMA  ) 

CALL  FFTEM(C,MK,-1) 

CALL  FFTRM(C,NK) 

CALL  EQUIV  CMPLX  TO  REAL  (  A,  C,  LIMA  ) 


Weight  the  conplex  frequency  array  using  the  user  specified 
filter  weighting. 


CALL  EQUiy_REAL_TO_CMPLX  (  A,  C,  LIMA  ) 
CALL  FBRIT(LUE,C,DF,NK,IFIEH,IER) 

CALL  EQUIV  CMPLX  TO  REAL  (  A,  C,  LIMA  ) 


Perform  a  conplex  to  real  FFT  on  C 


CALL  EQUIV_REAL_Tq_CMPLX  (  A,  C,  LIMA  ) 

CALL  FFTCM(C,NK) 

CALL  FFTEM(C,MK,1) 

CALL  EQUIV  CMPLX  TO  REAL  {  A,  C,  LIMA  ) 


(^tionally  perform  resanpling  on  resultant  wave  train.  If 
resanpling  not  performed  then  reset  ITT  and  N 


IF  (IRESAM  .EQ.  0)  THEN 
CALL  ESIZN(A,NK,N) 

*  ELSE 

DT  -  TN/NK 
N  -  NK 
ENDIF 

RETURN 

************************************************************************ 


*********************************************************************** 


DEC/CMS  REPLACEMENT  HISTORY,  Element  FILTA.FOR 


c 

c 

c 


Sijbroutine  library  for  the  program  &BIODYN 


C********************************************************************** 

c 


c 

c— 

c 

c*- 

c 

c 


Converted  to  GEDAP  Version  II 


SUBROUTINE  FBRIT  (LUE,C,DELF,NK,IFIRH,IER) 


C******************* **************************************************** 
P***************  M  h I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  M  I  I  I  I  I  I  ***************************** 

C***************^  4.***************************** 

2***************+  SUBROUTINE  FBRIT  +***************************** 


^***4r*A*4r***4r4rA^ 


^********** ********* ********** 


d^*************** 1  I  1  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  I  ***************************** 
c*********************************************************************** 
2*  * 
C* - -  -  ■  ■■ — ■* 

c* 

C*“ 

c* 
c* 
c* 
r* 
c*- 
c* 
r*- 
c* 
c* 

2* 

2* 

c* 


SUBROUTINE  SUMMARY 


SELECT  FREQUENCY  WEIGHTING  AND  FILTER  IN  THE  FREQUENCY  DOMAIN 
ACCORDING  TO  PREDEFINED  BIODYNAMIC  MODEL. 


SUBROUTINE  DESCRIPTIC»I: 


BASICALLY  PERFORMS  BAND-PASS  FILTERING  IN  THE  FREQUENCY  DCMAIN 

Coiqpile  instructions  -  @BIO  -  then  this  is  linked  to  BIODYN 

using  @BIODYN.LNK 


* 

.* 

* 

* 

* 

* 

.* 

* 

.* 

* 

* 

* 

* 

* 

.* 

* 

.* 

* 

* 

* 

* 

* 

'* 


;* 

C*- 

C* 

j* 

C* 

I* 

I* 

c* 

c*- 

* 

J*_ 

2* 

'* 

'* 

^*_ 

’* 

’*— 

'* 

* 


INPUT  PARAMETERS 


LUE  -  logical  isiit  number  for  error  messages 

C  -  conplex  frequency  array  (of  A),  to  be  filtered 

DELF  -  intersanple  spacing  of  the  freqency  array 

NK  -  number  of  elements  in  the  resanples  array  A 

IFIRH  -  integer  code  which  determines  which  weighting  function 


OUTPUT  PARAMETERS 


* 

-* 

* 

* 

* 

* 

.* 

* 

.* 

* 

* 


lER  -  an  error  indicator 

C  -  filtered  frequency  array 


LOCAL  VARIABLES 


NK 


-  number  of  elements  in  the  conplex  freq.  ar  C 
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c* 

c*- 

c* 

c*- 

c* 

c*- 

c* 

c* 

c* 

c* 

c* 


★ 

* 

•^c 

★ 

mit 


SUBROUTINES  AND  FUNCTICX^S  CALLED: 


C* 

C* 

C* 

C* 

C* 


Subroutine  Creation  Date  and  Author: 
Version  1.0  -  28  Nov.  1991 

-  George  Roddan,  BC 


— 

c* 

c* 

Subroutine  Modifications: 

c* 

^c* 

Version 

Date 

Author/Firm 

c* 

1.0 

9  Dec  1991 

George  Roddan/bcr 

c* 

c* 

2.0 

3  Feb  1992 

George  Roddan/bcr 

c* 

c* 

3.0 

11  Mar  1992 

George  Roddan/bcr 

★ 

* 

★ 

* 

* 


* 
* 
* 
* 
* 
* 
* 
★ 
* 
* 
* 
★ 
* 
* 

C********************************************************!*************** 

c 


Description: 


This  module  has  been  updated  to  reflect  the 
current  GEDAP  program  standards. 


IMPLICIT 

NOJE 

INCLUDE  'G2$;GGP.FOR' 

CHARACTER*32 

FILTER_TYPE 

INTEGER*4 

INTEGER*4 

I,  IFIRH,  lER,  LUE,  Nl,  N2,  N3,  N4,  NK,  NKH,NlMAX 
N5 

REAL* 4 

REAL*4 

ilEAL*4 

DELF,  Al,  Bl,  Cl,  Dl,  El,  Gl,  FTl,  FT2,  PI 

Fl,  F2,  F3,  F4,  F5,  F6,  Q1,  Q2,  Q3,  Q4,  K,  W 

TPI,  FPI,  H,  R1 

COMPLEX 

C,  HI,  S,  21,  22 

DIMENSICXJ 

C{ 131072),  HI  (131072) 

PARAMETER 

(  PI  -  3.141592654  ) 

NKH  -  m/2  +  1 

TPI  -  2.*PI 

FPI  -  4.*PI**2. 

C* - - - _* 

'■*  First  define  the  frequency  weighting  array 

J**4rA*4rifrA4r4r**4r******4t*4r*****4r**4r**!l^**ilr*AA******A4r4r***4r*4rA***4t*4r***4rA* 

Q****ic*ii*ii*****itieit*  Payne  Spinal  Model  ****************************** 

4r4r*  A  A*  A'^**V^ArA4r*******  *********************  A  A************ilt*A4r*  At  A***** 


IF  (IFIRH  .BQ.  0)  THEN 

Fl  ■>  52.9  !  rad/sec  ,  mdanped  natural  freq. 

R1  ■  .224  '  !  dancing  ratio 

FILTER_T5n?E  -  '  Payne  -  Spinal' 

Call  PUT_CHARACTER_PARAMETER  ( 'FILTER_TYPE' ,FILTER_TyPE) 
GO  TO  50 
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ENDIF 


C*******************  Payne  Visceral  Model**************************** 


C 

IF  (IFIRH  .EQ.  1)  THEN 

FI  =  25.1  !  rad/sec  ,  undamped  natural  freq. 

Rl  =  .400  !  damping  ratio 

FILTER_TYPE  »  '  Payne  -  Visceral' 

Call  PUT_aJARACTER_PAiy!JffiTER  ( 'FILTER_TYPE' ,  FILTER_TyPE) 

GO  TO  50 
ENDIF 
C 

C******************************************************************** 

C***********************  Body  Vibration  Model  *********************** 

C******************************************************************** 


C 

IF  (IFIRH  .EQ.  2)  THEN 

FI  «=  52.9  1  rad/sec  ,  undamped  natural  freq. 

Rl  ■  1.00  1  damping  ratio 

FILTER_TYPE  -  '  Body  -  Vibration' 

Call  PUT_CHARACTER_PARAMETER  ( 'FILTER_T5fPE' ,FILTER_TyPE) 
GO  TO  50 
ENDIF 


C 

A*  A*4tA*****4^*i^4r  *******  *************************** 

C***********************  Griffin  &  Fairlea  ************************** 

G*  ***  **********1%***  A  ***4^  ******  ********************  ******  ******* 

c 

IF  (IFIRH  .EQ.  3)  THEN 

FI  »  31.42  !  rad/sec  ,  xjndamped  natural  freq. 

Rl  ■  0.475  !  damping  ratio 

FILTER_TYPE  ■  '  Griffin  &  Fairlea  ' 

Call  PUT_CHARACTER_PARAMETER  ( 'FILTERJTYPE' ,FILTERjrYPE) 

GO  TO  50 
ENDIF 


C 

0** *********★**★★*★★**★★★★*★★*★***★*★★*★★★★**★★★*★*****★★★*★ ★★*★★*1*** 

C**************  Calculate  Complex  Tr2Uisfer  Function  ***************** 
G******************************************************************** 
G******** ***************************************************** ******* 


50  DO  I  -  1,NKH 

W«TPI*FLCIAT(  I )  *DELF 
S-cnplx(0.0,W) 

Zl  -  Fl**2.  +  S*2.0*R1*F1 

22  -  Fl**2.  +  S*2.0*R1*F1  +  S**2 


C 


Hl(I)-  (Zl)/(Z2) 
END  DO 


2* _ 

C*  Filter  the  signal  in  the  frequency  domain 

■  I  ■  " _ 

<1 

100  DO  I-  1,  NKH 

C(I)  »  C(I)*H1(I) 


END  DO 
GO  TO  200 


RETURN 


SUBROUTINE  FCOEF  (A,C,N,NK,DELF,DEL) 

C*****************1<**ifk**1iiiifk'k**icitit***1iic***ii*1t***1>itit1tit***iiit***itiiit******if 


C***************+  ^******************4t********** 

C***************^  SUBROUTINE  FCOEF  +******»********************** 
C***************^  +***************************** 

M  I  I  M  I  I  I  M  lilt  t+  +  +  )  4  ^  ^  +  4■*********************^^******* 

c*  * 


c***************+ 

c***************^ 


SUBROUTINE  SUMMARY 


Subroutine  used  to  convert  a  conplex  frequency  array  into 
'real'  frequency  array. 


SUBROUTINE  DESCRIPTIC»I 

Subroutine  used  to  convert  a  conplex  frequency  array  into 
a  'real'  frequency  array. 

INPUT  PARAMETERS 


C 

DELF 

NK 


-  conplex  frequency  array 

-  intersanple  spacing  of  frequency  array 

-  number  of  elements  in  array  C 


OUTPUT  PARAMETERS 

A  -  absolute  value  frequency  array 
N  -  number  of  elements  in  array  A 

SUBROUTINES  AND  FUNCTICX^S  CALLED: 


Subroutine  Creation  Date  and  Author 
Version  1.0  -  23  Dec.  1983 


Don  G.  Smith,  EWR 


★ 

★ 

.* 


c* 
c* 
c*- 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 
c* 

C********’***********1<**iiii**1fit*****1tit*it*it*1iit*1i***1t*it*-k**ifk*ii*****it***1i*** 

C 

NOJE 


C 

C 

C 

c 

c 


Subroutine  Modifications: 


Version 

1.0 

Description: 

1.1 


Date 

23  Dec.  1983 
Original 

22  Jan.  1985 


Author/Firm 
Don  G.  Smith/DMR 


Harold  Chard/DMR 


Description:  This  module  has  been  updated  to  reflect  the 
current  GEDAP  program  standards. 


* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 

* 


IMPLICIT 
INTEGER* 4 
REAL* 4 
COMPLEX 
DIMENSiai 


I,  N,  NK 
A,  DEL,  DELF 
C 

A(*),  C(*) 


N  -NK 
DEL  *=  DELF 
DO  I  -  1,NK 

A{I)  -  CABS(C(I)) 
END  DO 

RETURN 


C 

C*- 


END 

1  DEC/CMS  REPLACEMENT  HISTORY,  Element  FILTALIB.POR 

1  *1  2-NOV-1987  09:15:50  ALGC»J3UIN  "Low  and  high  pass  filtering  on  a  conplex  frequency  arre 

,  cardinal  filter." 

I  DEC/CMS  REPLACEMENT  HISTORY,  Element  FILTALIB.FOR 


* 
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Program 


CREST3.F0R 
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n  n  JO  nr.  in 


PROGRAM  a^ST3 


C  Program  Description 


'  This  program  calculates  the  various  statistical  values  such  as  RMQ, 

C  RMX,  RMO,  RMD  as  well  as  their  dose  values  from  a  weighted  acceleration 
G  record.  It  also  calculates  crest  factor  based  on  {MAX-MIN)/2. 

The  program  will  also  calculate  Max  DRI  vdien  used  in  conjuction  with 
-  DRI  model 

C - - - - - 

Definition  of  GEDAP  Data  Files 


M- 


Development  History 


Version  3.0  George  Roddan  &  Brian  Remedies  (BCR)  04-Feb-1992 

Version  3.1  by  George  Roddan  (BCR)  M2uc  DRI  calc  added  02-Mar-1992 

*****it*ie*it*i,l,i,i,ititi,i,ir*i,i,*iti,it**1,*'k1tit1t******it*1tit**it*1i***1Hi*****1t********** 


To  conpile  this  program  type  @crest3,  to  link  type  @crest3.1nk 


- 

Pareuneter 

Statements  for  User  Constants  and  Array  Dimensions 

f 

IMPLICIT 

NCME 

INTEGER*4 

N  max,  NUMBER  OF  CYCLES,  I  CYCLE 

REAL* 4 

PI  “ 

C 

PARAMETER 

(PI  -  3.141593,  N  max  -  262144) 

r— 

Explicit  Type  Declarations  for-  all  Variables  and  Arrays 

INTEGER*4 

G 

LOGICAL 

REAL*4 

REAL*4 

C 

- ^New  additions 


LUCIN,  LUCOUT,  N,  I,  Ll,  L2,  ISTATUS,  COUNT 
PAF 

DX,  XI,  VERSIONJJUMBER,  y(N_max),  KURT 
MAX,  RMS,  CREST_FACTOR,  eVDV,  VDV,  Ts 

since  version  1.0 - 


REAL*4 
REAL* 4 
REAL*4 


SUM,  RMQ,  RMX,  RMO,  RMT,  RMTT 
VXV,  VOV,  VTV,  VRV,  VTTV,  MIN 
DAS  DEL,  SAMPLE  RATE,  MAX  DRI 


CHAEACTER*16 
CHARACTER* 32 
CHARACTER*80 

CHARACTER*80 


DATAJX,  DATA_Y,  UNITS_X,  UNITSJf 
PROGRAM_NAME 

INPUT_FILE,  OUTPUT_FILE,  CORE_NAME, 
DEEAULT_OUTPUT_FILE,  FILE_TYPE,  PAF_FILE 
FILE  NAME 
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Initialize  GEDAP  System 


PROGRAM_NAME  -  'CREST3' 

VERSICN_NUMBER  =3.0 

CALL  OPEN_GEriAP_NOLIST  (  PROGRAM_NAME,  VERSICN_NUMBER, 
+  “  LUCIN,  LUCOUT  ) 


Obtain  the  number  of  Program  Cycles 


NUMBER_OF_CyCLES  -  1 

CALL  PAR_INTEGER_DEFAULT  ('number  of  program  cycles  [1]', 
+  NUMBER  OF  CYCLES  ) 


C 


Open  GEDAP  Input  euid  Output  File  Streams 


CALL  PRINT  MESSAGE  ( '  ' ) 


CALL  OPEN_INFUT_FILE_STREAM  {  1,  'input  file  containing'// 
+  '  time  series' ,ISTATUS  ) 

IF  (ISTATUS  .NE.  0)  CALL  CLOSE_GEnAP  (  ISTATUS  ) 

C 

CALL  PRINT  MESSAGE  ( '  ' ) 


CALL  OPEN_OUTPUT_FILE_STREAM  (  1,  'output  file  containing'// 
+  '  time  series'  ,  ISTATUS  ) 

IF  (ISTATUS  .NE.  0  )  CALL  CLOSE  GEDAP  (  ISTATUS  ) 


CALL  PRINT_MESSAGE  ( '  ' ) 

CALL  PAR_CHAR  (  'name  of  time  series  input  file  [.001]', 

U  +  INPUT_FILE  ) 

C  CALL  DEFAULT_FILE_TYPE  (  INFUT_FILE  ) 

• 

:  CALL  PARSE_FILE_SPEC  (  INPOT_FILE,  CORE_NAME,  Ll, 

C  +  FILE_TYPE,  L2  ) 

C  DEFAULT_OUTPUT_FILE  -  CORE_NAME(l;Ll )  //  '_CREST'  // 

+  FILE_TYPE(1:L2) 

C  Ll  -  Ll  +  L2  +  6 

C  CALL  PAR_CHAR  (  'name  of  output  file  [ '// 

+  DEFAULT_00TPUT_FILE(1:L1  )//']',  OUTPUT_FILE  ) 

C  IF  (  OUTPUT_FILE  .EQ.  '  '  )  THEN 

C  OUTPUT_FILE  -  DEFADLT_OUTPUT_FILE(l:Ll) 

:  END  IF 


C  CALL  OPEN_INPUT_FILE_STREAM_l  (  1,  1NPUT_FILE,  ISTATUS  ) 

C  IF  (ISTATUS  .NE.  0)  CALL  CLOSE_GEnAP  (  ISTATUS  ) 

• 

t  CALL  OPEN_OUTPUT_FILE_STREAM_l  (  1,  OUTPUT_FILE,  ISTATUS  ) 

C  IF  (ISTATUS  .NE.  0)  CALL  CLOSE  GEDAP  (  ISTATUS  ) 


G^  Read  Conversational  Ii^t  Parameters  lising  sxjbroutines  PAR_REAL, 
:  PAR  INTEGER,  PAR  CHAR,  etc. 


Read  data  from  a  GEDAP  type  Vl  input  file  into  array  Y 


I_CYCLE  -  1 

DO  WHILE  (  I_CYCLE  -LE.  NUMBER_OF_CYCLES  ) 

Q* ****************** ******★★*★**★•*★**★* *********************** ********** 

CALL  READ  GEDAP  1  (  1,  N  max,  DX,  XI,  N,  Y, 
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o  n  n  o  n 


+  DATAJC,  UNITS_X,  nATA_y,  UNITS_Y,  ISTATUS) 

IF  (  ISTATUS  .NE.  0)  CXOSE_GEDAP  (  ISTATUS  ) 

CALL  GET_INPUT_FILE  ( 1 , FILE_NAME ) 

CALL  PARSE_FILE_SPEC  (FILE_NAME,  CORE_NAME,  Ll, 

+FILE  TYPE,  L2) 


**********  USER  CODE  STARTS  HERE  ********** 


CALL  FETCH_REAL_PARAHETER  (  'STAT_MAX',  MAX  ) 

CALL  FETCH_REAL_PARAMETER  (  'STAT_MIN',  MIN  ) 

CALL  FrrH_REAL_PARAMETER  (  '  STAT_STD_DEV' ,  RMS  ) 
CALL  FETCH  REAL  PARAMETER  (  'STAT  KURTOSIS' ,KURT  ) 


CREST_FACTOR  »  ( (MAX-MIN)/2. )  /  RMS 
Ts  «  N  *  DX 

eVDV  «  ((  1.4  *  RMS)**4.0  *Ts)**.25 
VDV  ■=  (Ts  *  KURT)**. 25  *  RMS 
VRV  -  (Ts)**.5*RMS 


!  estimated  vib.  dose 
!  dose  based  on  ring 
1  dose  based  on  rms 


2  Calculate  the  sanple  rate  from  the  period 


CALL  FETCH_REAL_PARAMETER  ( 'DAS_DEL' ,DAS_DEL) 
SAMPLE_RATE  -  l/nAS_DEL 

SUM  =  0 
DO  COUNT=l,N 

SUM  -  SUM  +  (Y(COUNT)**4) 

END  DO 

RMQ  -  (SUM/N)  **  (1. 0/4.0) 

VDV  ed ready  defined  aJxjve 

SUM  -  0 
DO  COONT-l,N 

SUM  -  SUM  +  (Y(COUNT)**6) 

END  DO 

RMX  -  (SUN/N)  **  (1. 0/6.0) 

VXV  *  (RMX)*(Ts)**  (1. 0/6.0)  !  dose  based  on  rmx 

SUM  -  0 
DO  COUNT-1 ,N 

SUM  -  SUM  +  (Y(COUNT)**8) 

END  DO 

RMO  -  (SUM/N)  **  (1. 0/8.0) 

VDV  ■  (RMO)*(Ts)**  (1. 0/8.0)  !  dose  based  on  rmo 

SUM  -  0 
DO  CODNTWl,N 

SUM  -  SUM  +  (Y(  COUNT)  **10) 

END  DO 

RMT  «  (SUM/N)  **  (1.0/10.0) 

VTV  -  (RMT)*(Ts)**  (1.0/10.0)  !  dose  based  on  nnd 


SUM  »  0 
DO  COUNT=l,N 

SUM  «  SUM  +  (y( COUNT) **12) 

END  DO 

RMTT  -  (SUM/N)  **  (1.0/12.0) 

vnv  -  (RMTT)*(Ts)**  (1.0/12.0)  !  dose  based  on  rmtt 


MAX  DRI  «  MAX*285.55 


J  Max  DRI  assumes  units  are  metric 


!  and  Payne  spinal  model  only 


Store  parameters  in  B-Header  using  subroutines  PUT_REAL_PAEAMETER, 
PUT  INTEGER  PARAMETER  and  PUT  CHARACTER  PARAMETER.  (Optional) 


CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT_REAL_PARAMETER  ( 
CALL  PUT  REAL  PARAMETER  ( 


'CREST_FACTOR',  CREST_FACTOR  ) 
'eVDV',  eVDV  ) 

'VDV',  VDV  ) 

^Ts',  Ts  ) 

'RHQ',  RMQ) 

'RMX',  RMX) 

'RMO',  RMO) 

'RMT',  RMT) 

'RMTT',  RMTT) 

'VRV',  VRV) 

'VXV',  VXV) 

'VOV',  VOV) 

'VTV',  VTV) 

-vnv',  VTTV) 

’OB_RMQ_RMS',  RMQ/RMS) 
’OB_RMX_RMS',  RMX/RMS) 
’OB_RMO_RMS',  RI«)/RMS) 
OB_RMT_RMS',  RMT/RMS) 
OB_RMTr_RMS' ,  RMTT/RMS) 
SAMPLE_RATE' ,  SAMPLE_RATE) 

MAX  DRI',  MAX  DRI) 


r 


Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEnAP_l  (  1,  DX,  Xl,  N,  Y,  DATAJC,  UNITSJC,  nATA_Y, 
+  UNITS_Y,  PROGRAM_NAME,  VERSIOyJUMBER,  ISTATUS  ) 

r* 

IF  (  ISTATUS  .NE.  0)  CALL  CLOSE_GEElAP  (  ISTATUS  ) 

C""  mmw~r  mil  i  i  in  r  ii  ■■■wi  ii  i  !■— -ii  ■  ■■■—  ■ 

C  Add  new  parameters  to  the  parameter  Accumulation  File 


CALL  OPEN_ACCUMULATE  (riLEjrYPE{l:L2) ,  PAF,  PAF_FILE) 

IF  (PAF)  THEN 

CALL  PUT_REAL_PARAMETER  (  'CREST_FACTOR' ,  CREST_FACTOR  ) 

CALL  POT_REAL_PARAMETER  (  'eVDV',  eVDV  ) 

CALL  PUT_REAL_PARAMETER  (  'VDV',  VDV  ) 

CALL  PUT_REAL_PARAMETER  (  'Ts',  Ts  ) 

CALL  PUT_REAL_PARAMETER  (  'RMQ',  RMQ) 

CALL  POT_REAL_PARAMETER  (  'RMX',  RMX) 

CALL  PUT_REAL_PARAMETER  (  'RMO',  RMO) 

CALL  PUT_REAL_PARAMETER  (  'RMT',  RMT) 

CALL  PUT_REAL_PARAMETER  {  'RMTT',  RMTT) 

CALL  PUT_REAL_PARAMETER  (  'VRV',  VRV) 

CALL  PUT_REAL_PARAMETER  (  'VXV',  VXV) 

CALL  PUT_REAL_PARAMETER  (  'VOV',  VOV)  19 9 

CALL  PUT_REAL_PARAMETEH  (  'VTV',  VTV) 

CALL  PUT_REAL_PARAMETER  (  'VTTV',  VTTV) 

CALL  PUT_REAL_PARAMETER  (  'OB_RMQ_RMS' ,  RMQ/RMS) 

CALL  PUT_REAL_PARAMETER  (  'CB_RMX_RMS' ,  RMX/RMS) 

CALL  PUT  REAL  PARAMETER  (  'C»  RMO  RMS',  RMO/RMS) 


CALL  PUT_REAL_PARAMETER 
CALL  PUT_REAL_PARAMETER 
CALL  PUT_KEAL_PARAMETER 
CALL  PUT  REAL  PARAMETER 


OB_RMT_RMS',  RMT/RMS) 

(  'OB_RMTT_RMS',  RMTT/RMS) 

(  'SAMPLE_RATE' ,  SAMPLE_RATE) 
(  'MAX  DRI',  MAX  DRI) 


CALL  CLOSE_ACCUMULATE  (PAF_FILE) 
ENDIF 


c** 

END  OF  MAIN  RECYCLING  LOOP 

OK 

I  CYCLE  «  I  CYCLE  +  1 

END  DO 

Close  GEDAP  and  Terminate  Program 

C 

CALL  CLOSE  GEDAP  (0) 

CALL  EXIT 

END 

200 


Program 


IMPULSE. FOR 


.201 


PROGRAM  IMPULSE 


Program  Description 


This  program  calculates  iirpilsiveness  measures  for  a  number  of 
C  different  cumulative  probability  levels. 


c  Progam  Linking  on  VAVVMS 
C - 


$  Link  IMPULSE, G2$:DSP/L,GEnAPA 


Definition  of  GEDAP  Data  Files 


Input  File:  DENS  CDH,  Cumulative  Probability  Density 


Developnent  History 


^  Version  1.0  by  George  Roddan  (BCR) 

with  code  (INTCD)  developed  by  M.D.  Miles  (NRC) 


05-Feb-1992 


C*********************iiiii(*if****it***-k******1t*ii***it*-kifk'kit*it**1t*****it***1i*1( 


C  Parameter  Statements  for  User  Constemts  euid  Array  Dimensions 


IMPLICIT  NONE 

INCLUDE  » G2$ : GGP . FOR ' 

INTEGERS  N_max,  I,  LI,  L2,  L3 

REAL* 4  PI 

PARAMETER  (PI  -  3.141593,  N  max 


-  GGP$NFFT  MAX  ) 


Explicit  T^pe  Declarations  for  all  Variables  and  Arrays 


INTEGER*4  I  CYCLE,  LUCIN,  LUCOUT,  N,  NUMBER  OF  CYCLES 


REAL*4 

Real 


VERSICN_NUMBER,  X(N_max),  Y(N_max),  ARMS,  IM(6) 
PPLUS(6),  PMINUS(6),  APLUS(6),  AMINUS(6) 


CHAEACTER*16  DATA_X,  DATA_Y,  UNITS_X,  UNITS_Y 
CHARACTER*32  PR0GRAM_NAME,  FILE_TYPE 
CHARACTER*80  PAF_FILE,  FILE_NAME,  CORE_NAME 

LOGICAL  PAF 


Data  Statements  -  Defines  upper  and  lower  cumulative  probability 


■T  n 


levels:  0.99,  0.97,  0.95,  0.93,  0.88,  0.81 
(  Arranged  symmetrically  2dx)ut  the  mean  value  ) 


Data  PPlus/0.995,  0.985,  0.975,  0.965,  0.940,  0.905/ 
Data  PMinus/0.005,  0.015,  0.025,  0.035,  0.060,  0.095/ 


Initialize  GEDAP  System 


PROGRAM_NAME  -  'IMPULSE' 

VERSICN_NUMBER  =1.0 

CALL  OPEN_GEDAP_NOLIST  (  PROGRAM_NAME ,  VERSI(»I_NUMBER, 
f  LUCIN,  LUCOUT  ) 


Obtain  the  Number  of  Program  Cycles 


NUMBER_OF_CYCLES  =  1 

CALL  PAR_INTEGER_DEFAULT  (  'number  of  program  cycles  [1]' 
I-  NUMBER  OF  CYCLES  ) 


Open  GEDAP  Input  Output  File  Streams 


CALL  OPEN_INPUT_STREAM  (  1,  'name  of  input  file'  ) 
CALL  OPEN_OUTPUT_STREAM  (  1,  'name  of  output  file'  ) 


Read  Conversational  Input  Parameters  using  subroutines  EAR_REAL, 
^  PAR_INTEGER,  PAR_CHAR,  etc. 


C*********************************************************************** 

''***  START  OF  MAIN  RECYCLING  LOOP  ******* 
*********************************************************************** 

C 

I_CYCLE  «  1 

DO  WHILE  (  I  CYCLE  .LE.  NUMBER  OF  CYCLES  ) 


Read  data  from  a  GEDAP  type  V2  input  file  into  array  Y 


CALL  READ_GEDAP_V2  (  1,  Njnax,  N,  X,  Y, 

nATA_X,  UNITS_X,  DATA_Y,  UNITS_Y  ) 
CALL  GET_INPUT_FILE  (1,  FILE_NAME) 

CALL  PARSE_FILE_SPEC  (FILE_NAME,  CORE_NAME,  LI, 

FILE  TYPE,  L2) 


**********  USER  CODE  STARTS  HERE  ********** 


Fetch  parameters  - 

CALL  FETCH  REAL  PARAMETER  (  'STAT  RMS',  ARMS  ) 


n  n 


C  Calcnalate  Impulsiveness 
DO  I  *  1,6 

CALL  INTP2(  Y,  X,  N,  PPLUS(I),  APLUS(I)) 
CALL  INTP2(  Y,  X,  N,  PMINUS(I),  AMINUS(I)) 
IM ( I )  -  ( APLUS  ( I ) -AMINUS  ( I ) )/( 2 . 0*ARMS ) 

END  DO 


C  store  parameters  in  B-Header  using  subroutines  PUT_REAL_PARAMETER, 
:  PUT_INTEGER_PARAMETER  and  PUT  CHARACTER  PARAMETER.  (Optional) 


C 

CALL  PUT_REAL_PARAMETER  ('I_99',  IM{1)  ) 

CALL  PUT_REAL_PARAMETER  ('I_97',  IM(2)  ) 

CALL  PUT_REAL_PARAMETER  ('I_95',  IM(3)  ) 

CALL  PUT_REAL_PARAMETER  {'I_93',  IM(4)  ) 

CALL  PUT_REAL_PARAMETER  ('I_88',  IM(5)  ) 

CALL  PUT_REAL_PARAMETER  ('I_81',  IM(6)  ) 

C 

- -  -  -  II  -  III  Ml  tf-m  imm  —  i  n  nm  ■  ■ 

Write  data  from  array  Y  into  a  GEDAP  type  V2  output  file 


CALL  WRITE_GEnAP_V2  (  1,  N,  X,  Y, 

+  DATA_X,  UNITS_X,  nATA_Y,  UNITS_Y  ) 

Add  new  parameters  to  the  Parameter  Accumulation  File 


CALL  OPEN  ACCUMULATE  (  FILE_TYPE(1:L2) ,  PAF,  PAF  FILE  ) 
IF  (PAF)  THEN 

CALL  PUT  REAL_PARAMETER  ('I_99',  IM(1)  ) 

CALL  PUT~REAL_PARAMETER  ('I_97',  IM(2)  ) 

CALL  PUT_REAL_PARAMETER  ('I_95',  IM(3)  ) 

CALL  PUT_REAL_PARAMETER  ('I_93',  IM(4)  ) 

CALL  PUT_REAL_PARAMETER  ('I_88',  IM(5)  ) 

CALL  PUT_REAL_PARAMETER  ('I_81',  IM(6)  ) 

CALL  CLOSE_ACCUMULATE  (PAF_FILE) 

ENDIF 


2*********************************************************************** 
2***  end  OF  MAIN  RECYCLING  LOOP  *********** 
C*********************************************************************** 

I_CYCLE  -  I_CYCLE  +  1 
END  DO 
C 

C  Close  GEDAP  and  Terminate  Program 
^ -  ■  --  "  — . —  - 

C 

CALL  CLOSE__GEnAP  (0) 

CALL  EXIT 


Program 


ISO. FOR 
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c - ■ - — 

ISO.  FOR  -  ANSI  3rd  Octave  Analysis 


C 

PROGRAM  ISO 

C - 

C  Program  Description 


.  Originally  written  by  Ncibibh  (Fort  Rucker,  AL)  for  a  PC-Based 
C  data  acquisition  system,  ISO  reconfigures  spectrum  input  files  according 
~  to  the  3rd  octave  method  described  in  the  ISO  stsindard  SI.  11-1986. 

This  results  in  a  file  with  an  unequal  spacing  of  the  X  coiiponents 
C  (frequency)  and  thus  must  be  placed  in  a  V2  data  file, 
r 


v_  Conpile  and  link  this  program  with  I. COM,  however  if  you  want  to  debug 
C  it  first  use  ND.COM  (NoDebug)  instead. 


C  Definition  of  GEDAP  Data  Files 


u  ISO. for 
C  MKFILTER.for 
FILGAIN.for 
COMMONS. oct 
C 


-  this  file  (main  program) 

-  make  filter  subroutine 

-  gain  calculations  subroutine 

-  common  varieible  listings 


Development  History 

C - - 

r 

Version  1.0  Brian  Remedios  Dec  17,  1991 

w 


c 


Parameter  Statements  for  User  Constants  and  Array  Dimensions 


IMPLICIT  NCXOE 

C 

include  'CCMMCXJS.OCT' 

INTEGE3l*4  Njnax 
REAL* 4  PI 

PARAMETER  (PI  -  3.141593,  N  max  -  200000) 


r.  Explicit  Type  Declarations  for  all  Variables  and  Arrays 


INTEGER*4  I  CYCLE,  LUCIN,  LUCOUT,  N,  NUMBER  OF  CYCLES 


C 


REAL*4 

REAL*4 

REAL*4 

REAL*4 

INTEGER*2 


DX,  XI,  VERSICW_NUMBER,  Y(N_max) 

KK , GG , SS , SQM , ROM , FM , BASE , URAT , BDES 
KTEN,KEXP,SHZ,DHZ,DBS,FF,RMS,  SQS 
OUt_X(25),  out_Y(25) 

IBN, K, INT, K1 , K2 , IERR,NPT, ICH 


CHARACTER*16  DATA_X, 'nATA_Y,  UNITS_X,  UNITS_Y 
CHARACTER*32  PROGRAM 
CHARACTER  PROGRAM  NAME*12 


Initialize  GEDAP  System 


C 

PRCX3RAM_NAME  *  'ISO' 

VERSiai_NUMBER  «  1.0 

CALL  OPEN_GEnAP_NOLIST  (  PROGRAM_NAME ,  VERSIC»J_NUMBER, 
+  LUCIN,  LUCOUT  ) 


C  Obtain  the  Number  of  Program  Cycles 


NUMBER_OF_CYCLES  *  1 

CALL  PAR_INTEGER_DEFAULT  (  'niunber  of  program  cycles  [1]', 
+  NUMBER  OF  CYCLES  ) 


O 


C 


O 

o 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_INPUT_STREAM  (  1,  'name  of  input  file'  ) 
CALL  OPEN_OUTPUT  STREAM  (  1,  'name  of  output  file'  ) 


Read  Conversational  Input  Parameters  using  subroutines  PAR_REAL, 
PAR  INTEGER,  PAR  CHAR,  etc. 


C***  START  OF  MAIN  RECYCLING  LOOP  ******* 
I__CYCLE  -  1 

DO  WHILE  (  I  CYCLE  ,LE.  NUMBER  OF  CYCLES  ) 


C- 

r 


Read  data  from  a  GEDAP  type  VI  input  file  into  array  Y 


CALL  READ_GEDAP_V1  (  1,  Njnax,  N,  DX,  XI,  Y, 

+  DATA  X,  UNITS  X,  DATA  Y,  UNITS  Y  ) 


C  **********  USER  CODE  STARTS  HERE  ********** 


NPPCH  -  N 
HZPCH  »  DX 
NFRQ  «  NPPCH 
FUND  -  DX 
do  k  -  1,  NFRQ 

FREQ(k)  -  k  *  FUND 
end  do 


!  number  of  frequency  conponents 
!  fundamental  (resolution)  of  spectrum 
J  harmonic  frequencies  in  FFT  spectrum 
!  Fundamental  to  Nyquist  (no  DC  term) 


NBAN  -  25 
BDES  -  1.  /  3. 

URAT  -  2.0  **  BDES 
do  IBN  -  1,NBAN  - 
KTEN  -  IBN  /  10 
BASE  -  10.  **  KTEN 
KEXP  -  IBN  -  10*KTEN 


I  in  case  filters  are  already  made 
!  bandwidth  designator  (1/3  octave) 

!  frequency  ratio,  binary  base 
!  generate  needed  arrays 
!  which  decade  is  this  band 
!  DEC— >BASE:  0:1  1-10  2-100  3-1000 

1 


FM  =  BASE  *(  URAT**KEXP  )  !  calculate  exact  mid-band  frequency 


FMID(IBN)  *=  FM 
kom  *  FM  /  FUND  +0.5 
LMID(IBN)  •=  kom 
end  do 

call  MAKE  FILTERS 


do  K  -  1,  NFRQ 

SIGSQ(K)  -=  2  *  DX  *  Y(K) 
end  do 


!  store  it  in  table 
!  coii5>onent  nearest  FMID  in  spectrum 
!  save  its  location 


I  FILTER. OCT  made  &  closed 

1  conpjte  (once)  squared  fft 
1  squared  mag  of  signal 


do  IBN  *  1,  NBAN  !  all  25  band  filters 

SQS  *  0  .  !  initialize  sum  of  SQUARES 

call  FILTER_GAIN( IBN, FMID ( IBN ),LMID( IBN ),K1,K2) 

do  kk  -  K1,K2  !  sm  terms  above  threshold 

GG  -  GAINSQ{kk)  1  pre-conpated  squared  filter  gain 

SS  -  SIGSQ  (kk)  I  pre-conpjted  squared  signal 

FF  -  GG  *  SS  !  filter  the  signal 

SQS  -  SQS  +  FF  1  add  filtered  term 

enddo  I  next  component 


SQM  -  SQS  /  2. 

RMS  -  sqrt(SQM) 

if  (  RMS.gt.  l.e-12  )  then 
DBS  -  20  *  alogl0(  RMS  ) 
else 

'  DBS  -  -999. 
endif 


!  MEAN  of  SQUARES 
I  ROOT-MEAN-SQUARES 


!  convert  to  deciBels 
!  if  zero  signal 


OUtJXdBN)  -  FMID(IBN) 
out_y(IBN)  -  RMS 
enddo 


I  all  bands  done 


Store  parameters  in  B-Header  using  subroutines  PUT_REAL_PARAMETER, 
C  PUT_INTEGER_PARAMETER  and  PUT_CHARACTER_PARAMETER.  (Optional) 


Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEnAP_V2  (  1,  25,  out_X,  out_Y, 

+  DATA_X,  UNITS_X,  DATA_Y,  UNITS_Y  ) 

C 

:***  END  OF  MAIN  RECYCLING  LOOP  *********** 

c 

I_CYCLE  »  I_CYCLE  +  1 
END  DO 


Close  GEDAP  and  Terminate  Program 


CALL  CLOSE_GEDAP- (0) 

CALL  EXIT 

END 
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subroutine 


MAKE  FILTERS 


include  ' COMMCNS . OCT ' 


BDES  =  1.  /  3. 

URAT  =  2.0  **  BDES 


!  bandwidth  designator  (1/3  octave) 
!  frequency  ratio,  binary  base 


I  band  number,  KB 
!  midband  Hz,  FM  ■ 


(1)  ...  (10)  (11)  ...  (20)  (21)  ...  (25) 

1.0  ...  8.0  10.0  ...  80.0  100  ...  250  Hz 


do  IBN  -  1,  NBAN 


1  store  gains  of  25  band  filters  on  disk 


KTEN  -  IBN  /  10 
BASE  -  10.  **  KTEN 
KEXP  -  IBN  -  10*KTEN  -  1 
FM  -  BASE  *(  URAT**KEXP  ) 
FMID(  IBN  )  -  FM 
kom  =  FM  /  FUND  +0.5 
LMID(  IBN  )  -  kom 


I  \diich  decade  is  this  band 

!  DEC— >BASE:  0:1  1-10  2-100 


3-1000 


!  calculate  exact  mid-band  frequency 
I  store  it  in  table 
!  component  nearest  FMID  in  spectrum 
!  save  its  location 


call  FILTER  GAIN(  IBN,  FM,  kom,  K1,K2  ) 


1 


conpute  filter  gain 


enddo 


RETURN 

END 


Program 


SPECF.FOR 


-» 


SPECF.FOR 

C 


C 

C 


This  program  calculates  the  crest  factor  of  a  spectral 
distribution.  This  a  fonn2  program. 

It  also  types  the  resulting  waveform  as  to  vrfiether  it  is 
a  type  1  -  Guassian,  type  2  -  Tonal  or 
type  3a  -  nonstationary  changing  mean  level  or 
type  3b  -  nonstationary  shock. 


c 


c 


c 


-  The  program  also  calculates  normalized  (to  60  sec.) 
dose  quantities. 

-  FORM2  does  not  include  cycling. 

-  Use  FORM2A  for  type  V2  data  files  with  cycling. 

-  Use  FORMl  or  FORMIA  for  VI  data  files. 


PROGRAM  SPECF 


C  Program  Description 

c - - - 

This  program  calculates  the  crest  factor  for  a  spectral  distribution 
defined  for  a  type  V2  data  file.  This  type  of  file  is  created  by  prog. 

C  ISO. FOR  vrtiich  calculates  the  third-octave  spectrum  from  the  spectral 

density  file  create  by  GEDAP  program  VSD. 

C  The  program  also  types  the  signal  according  to  the  values  of  the  parameters, 
and  the  value 

of  the  spectrum  crest  factor,  specf. 


C - - - _____ - 

Definition  of  GEDAP  Data  Files 

C 

To  link  this  code  to  GEDAP  type  @specf.lnk 

c 

c — 

Developnent  History 

Version  1.0  by  George  Roddan  (BCR) 

21-SEPT-92 

C 

I*********************************************************************** 


o 


r 

Parameter 

Statements  for  User  Constants  and  Array  Dimensions 

1 

IMPLICIT 

NC»JE 

LOGICAL 

PAF 

INTEGER*4 

N  max 

REAL*4 

PI 

C 

PARAMETER 

(PI  -  3.141593,  Njnax  -  250000) 

''w. 

Explicit  Type  Declarations  for  all  Variables  and  Arrays 

c 

INTEGER*4 

LUCIN,  LUCOUT,  N,  COUNT,  Ll,  L2,  L3 

RMT/RMS, 
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U  C  )  C  )  u 


REAL*4 
REAL*4 
REAL* 4 
REAL*4 


VERSIOJJJUMBER,  X(Njnax),  Y(N_inax),  SPEC_CF 
MAX_VALUE,  MEAN_VALUE,  I_97,  RMT_RMS,  TS,  SUM 
VRV,VDV,  VITV,VRV60  ,VI]V60  ,VTTV60 ,  SPEED 
SI04AL  TYPE 


CHARACTER*16 
CHARACTER*16 
CHARACTER*32 
CHARACTER* 80 
CHARACTER*80 


DATA_X,  nATA_Y,  UNITS_X,  UNITS_Y 
RUN_FILE,  RUN_FILE1,  RQAD_TYPE,  DIR_ECTICW 
PROGRAM_NAME 

C0RE_NAME,  FILE_TYPE,  PAF_FILE,  DIRECTORY 
FILE  NAME 


v-= 

C 


Initialize  GEDAP  System 


PROGRAM_NAME  -  'SPECF' 

VERSiay^UMBER  -  1.0 

CALL  OPEN_GEDAP_NOLIST  (  PROGRAM_NAME,  VERSICNJNUMBER, 
+  LUCIN,  LUCOUT  ) 


C  Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_INPUT_STREAM  (  1,  'name  of  input  file'  ) 


C  Read  data  from  a  GEDAP  type  V2  input  file  into  array  Y 

-I 

CALL  READ_GEDAP_V2  (  1,  N_max,  N,  X,  Y, 

+  DATA_X,  UNITS  X,  DATA  Y,  UNITS_Y  ) 

Z  Input  appropriate  GEDAP  Header  Parameters. 

CALL  FETCH  REAL  PARAMETER  (  'I  97',  I  97  ) 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_INPUT_STREAM  (  2,  'name  of  input  file'  ) 

CALL  OPEN_OUTPUT_STREAM  (  2,  'name  of  output  file'  ) 

c 

:  Read  Conversational  Input  Parameters  using  subroutines  PAR  REAL, 
:  PAR_INTEGER,  PAR_CHAR,  etc. 


CALL  PAR_CHAR  ('input  run-file',  RUN_FILEl) 

CALL  PAR_REAL  ('input  speed',  SPEED  ) 

CALL  PAR_CHAR  ('input  road  type',  RQADJTYPE) 

CALL  PAR_CHAR  ('input  axis  direction',  DIR_ECTICXJ) 
CALL  PARSE_FILE_SPEC  (RUN_FILEl,  RUN_FILE, 

+L1,  FILE  TYPE,  L2  ) 


C  Read  data  from  a  CTDAP  type  V2  input  file  into  array  Y 


1  n 


CALL  READ  GEnAP_V2  (  2,  Njnax,  N,  X,  Y, 

+  “  DATA_X,  UNITS_X,  nATA_Y,  UNITS_Y  ) 

CALL  GET_INPUT_FILE  (2,  FILE_NAME) 

CALL  PARSE_FILE_SPEC  (FILE_NAME,  CORE_NAME,  Ll, 

+FILE  TYPE,  L2) 


C  Input  appropriate  GEDAP  Header  Parameters. 

CALL  FETCH_REAL_PARAMETER  (  ' OB_RMTT_RMS ' ,  RMT_RMS  ) 

CALL  FETCH_REAL_PARAMETER  (  'VRV' ,  VRV  ) 

♦  CALL  FETCH_REAL_PARAMETER  (  'VDV' ,  VDV  ) 

CALL  FETCH_REAL_PARAMETER  (  'VTTV',  VTTV  ) 

CALL  FETCH_REAL_PARAMETER  (  'Ts',  TS  ) 

^  **********  USER  CODE  STARTS  HERE  ********** 


First  determine  mean  value 

SUM  -  0.0 
DO  COUNT  =  1,N 

SUM  -  SUM  +  Y( COUNT) 

END  DO 

MEAN  VALUE  =  SUM/N 


C  Determine  maximum  value 

MAX_VALUE  =  Y(l) 

DO  COUNT  ■=  2,N 

IF  (Y( COUNT ).GT.MAX_VALUE)  THEN 
MAX_VALUE  -  Y( COUNT) 

ENDIF 
END  DO 
C 

:  Calculate  SPECF,  spectral  Crest  Factor 

SPEC_CF  -  MAX_VALUE/MEAN_VALUE 


C  Start  of  code  to  type  signal 


C  lype  1  -  Gaussian  Signal 

IF  (((RMT_RMS.GT.2.0).AND.(RMT_RMS.LT.2.5)) 
+.AND. { (I_97.LT.2.3)  .AND. (SPEC_CF.LT.4.0) ) )  THEN 
SIGNAL_TYPE  -=  1 
ENDIF 


C  lype  2  -  Tonal  Signal 

IF  ( (RMT_RMS.LT. 2.0)  .OR.  ( ( (RMT_RMS.GT.2.0)  .AND. 

+(RMT_RMS.LT.2.5) ) .AND. (SPEC_CF.GE.4.0) ) )  THEN 
SIC2qAL_TYPE  »  2 
ENDIF 
C 
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.■  TVpe  3  -  Non-stationary  Signal  -  of  varying  mean  level 

IF  { ( ( {RMT_RMS.GT.2.0)  .AND.  {RMT_RMS.LT.2.5) )  .AND. 

+  (I_97.GE.2.3) ) .OR. ( (RMT_RMS.GE.2.5)  .AND. (I_97.GT.2.6) ) ) 


c 


-f-THEN 

SIGNAL_TYPE  *  3 
ENDIF 


Type  4  -  Non-stationary  Signal  -  containing  shocks 


IF  {(RKT_EMS.GE.2.5).AND.(I_97.LE.2.6))  THEN 

SIGNAL_TYPE  •=  4 

ENDIF 


J  Start  of  code  to  calculate  normalized  60  second  dose 
C  See  PP.  14  British  Standard  6841  Appendix  A. 3 


A 


C 

IF  (VRV.LT. 0.001)  THEN 
VEV60-0.00 
VDV60=0.00 
VnV60=0.00 
GOTO  999 
ENDIF 

^  60  sec.  dose  based  on  rms  (2) 

VRV60  =  ((60/TS)*  VRV**2)**.5 
C 

60  sec.  dose  based  on  rinq  (4) 

VDV60  -  ((60/rS)*  VDV**4)**.25 
60  sec.  dose  based  on  nnt  (12) 

VnV60  -  ((60/TS)*  VTTV**(12.))**(1./12.) 


C 


Store  parameters  in  B-Header  using  subroutines  PUT_REAL_PARAMETER, 
C  POT_INrEGER_PARAMETER  and  PUT_CHARACTER_PARAMETER.  (Optional) 


999  CALL  PUT_PEAL_PARAMETER( '  SPECF ' ,  SPEC_CF ) 

CALL  PUT_REAL_PARAMETER(  "VEV60SVE760) 

CALL  PUT_REAL_PARAMETER( ' VDV60 '  ,VDV60 ) 

CALL  POT_REAL_PABAMETER('VTTV60',VTIV60) 

CALL  PUT_REAL_PARAMETER( ' TS ' , TS ) 

CALL  PUT_REAL_PARAMETER(' SPEED',  SPEED) 

CALL  POT_REAL_PAI«METER('SIGNAL_TYPE',  SIGNAL_TYPE)  ^ 

CALL  PUT_CHAIV^CTER_PARAMETER('RUN_FILE',  RUN_FILE) 

CALL  PUT_CHARACTER_PARAMETER('RC1AD_TYPE',  RQAD_TYPE) 

CALL  PUT  CHARACTER  PARAMETER ( 'DIR  ECTION' ,  DIR  ECTICW) 


C  Add  new  parameters  to  the  Parameter  Accumulation  File 
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CALL  OPEN_ACCUMULATE  (  FILE_TyPE(l:L2)  ,  PAF,  PAF_FILE) 
IF  (PAF)  THEN 

CALL  PUT  REAL  PARAMETER ( 'SPECF' , SPEC  CF) 


n  n 


CALL  PUT_REAL_PARAMETER( 'VEV60' ,VRV60) 

CALL  PUT_REAL_PARAMETER('VDV60',VDV60) 

CALL  PUT_REAL_PAIW1ETER( 'VTIV60^VTTV60) 

CALL  PUT_REAL_PARAMETER( 'TS' ,TS) 

CALL  PUT_REAL_PARAMETER( 'SPEED',  SPEED) 

CALL  PUT_REAL_PARAMETER( 'SIC2IAL_TYPE' ,  SIGNAL_TYPE) 

CALL  PUT_CHAKACTER_PAi»LMETER('RUN_FILE',  RUN_FILE) 

CALL  PUT_CHARACTER_PARAMETER( 'RQAD_'m>E' ,  RQAD_TYPE) 
CALL  PUT_CHARACTER_PARAMETER( 'DIR_EC^IC»^' ,  DIR_ECTICN) 

CALL  CLOSE_ACCUMULATE  (PAF_FILE) 

ENDIF 

C  Write  data  from  array  Y  into  a  GEDAP  type  V2  output  file 


CALL  WRITE_GEDAP_V2  (  2,  N,  X,  Y, 

+  nATA_X,  UNITS_X,  DATA^Y,  UNITS_Y  ) 

C 


Close  GEDAP  and  Terminate  Program 


C 


CALL  CLOSE_GEDAP  (0) 

CALL  EXIT 

END 
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Program 


APPEND. FOR 
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o  n  n  n  o  n 


APPEND. FOR  -  This  program  joins  two  Gedap  VI  files  together 
eind  outputs  a  single  file. 


PROGRAM  APPEND 


Program  Description 

This  program  joins  two  GEDAP  Vl  files  together.  The  program  assumes 
that  they  have  the  same  units. 


C  Definition  of  GEDAP  Data  Files 

C - - - - - 

C  To  link  this  code  to  GEDAP  type  gappend.lnk 


Development  History 


Version  1.0  by  Brian  Remedios  (BCR) 


28-OCT-92 


t;************************************************************************ 


Parameter  Statements  for  User  Constants  and  Array  Dimensions 


IMPLICIT  NOJE 


LOGICAL  PAF 

INTEGER* 4  N_max 

REAL*4  PI 

PARAMETER  (PI  -  3.141593,  N  max  -  262144) 


Explicit  Type  Declarations  for  all  Variables  and  Arrays 


INTEGER*4  LUCIN,  LUCOOT,  Nl,  N2,  COUNT,  Ll,  L2,  L3 

INTEGER*4  ISTATUS 


REAL*4 

REAL*4 


VERSION_NUMBER,  Xl,  yl(N_max) 

X2,  Y2(N  max),  Y3(Nmax),  DX,  DX2 


CHARACTER*16  DATA_X,  DATA_Y,  UNITS_X,  UNITS_Y 
CHAEACTER*16  DATA_X2,  DATA_Y2,  UNITS_X2,  UNITS_Y2 
CHARACTER*16  RUN_FILE,  RUN_FILEl,  RClAD_TYPE,  DIR_ECTIC»J 
CHARACTER*32  PROGRAM_NAME 

CHARACTER*80  CORE_NAME,  FILE_TYPE,  PAF_FILE,  DIRECTORY 
CHARACTER*80  FILE  NAME 


Initialize  GEDAP-  System 


PR0C3W^  NAME 


»  'APPEND' 


VE3^I(»I_NUMBER  -1.0 

CALL  OPENjGEnAP_NOLIST  (  PRCX3RAM_NAME ,  VERSIC»I_NUMBER, 
+  LUCIN,  LUCOUT  ) 


Open  GEDAP  Input  and  Output  File  Stre.;jns 


CALL  OPEN_INPUT_FILE_STREAM  (  1,  'name  of  first  input  file', 
+  I STATUS) 

CALL  OPEN_INPUT_FILE_STREAM  (  2,  'name  of  second  input  file', 
+  ISTATUS) 


Read  data  from  a  GEDAP  type  VI  input  files  into  arrays  Yl,  and  Y2 


CALL  READ_GEnAP_Vl  {  1,  N_max,  Nl,  DX  ,  Xl,  Yl, 

+  DATA  X,  UNITS  X,  DATA  Y,  UNITS  Y  ) 


CALL  READ_GEDAP_V1  (  2,  N_max,  N2,  DX2  ,  X2,  Y2, 

+  DATA  X2,  UNITS  X2,  DATA  Y2,  UNITS  Y2  ) 


C 

f'. 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_OUTPUT_FILE_STREAM  (  3,  'name  of  output  file', 
+  ISTATUS  ) 


C  Read  Conversational  Input  Par2uneters  using  subroutines  PAR_REAL, 
''  PAR  INTEGER,  PAR  CHAR,  etc. 


c 

:  ********** 

USER 

CODE 

STARTS 

HERE 

********** 

C 

;  Join  the  two  arrays  together  into  a  third  array 


DO  COUNT  -  1,N1 

Y3(count)  -  Yl(count) 
END  DO 

DO  COUNT  -  1,N2 

Y3(count+Ni)  -  Y2( count) 
END  DO 


C 

r. 


Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEDAP_1  {  3,  DX,  Xl,  N1+N2,  Y3,  DATA_X,  UNITSJC, 
+  DATA_Y,  UNITS_Y,^  PROGRAM_NAME,  VERSIOIJNUMBER, ISTATUS) 


C  Close  GEDAP  eind  Terminate  Program 


CALL  CLOSE_GEDAP  (0) 
CALL  EXIT 


Program 


MULTIXY .FOR 


c  MLJLTIXY.FOR  -  This  program  multiplies  a  Gedap  Vl  file  with  a  user 
C  specified  "shape"  function  point  for  point  and 

outputs  a  single  file. 

-  This  program  was  developed  for  creating  signal 
C  control  files  with  varying  rms  levels  in  the 

USAARL  project. 


c 

*  PROGRAM  MULTIXY 


C  Program  Description 


This  program  multiplys  a  GEDAP  Vl  file  together  with  a  user  specified 
C  "shape"  function. 

n 


u 

r _ 

Definition  of  GEDAP  Data  Files 

r _ 

To  link  this  code  to  GEDAP  type  @multixy.lnk 

Development  History 

C 

C  Version  1.0  George  Roddan  (BCR)  18-OCT-92 


^****************************************Hr****************************** 

C 


Parameter 

Statements  for  User  Constants  and  Array  Dimensions 

r 

IMPLICIT 

LOGICAL 

PAF 

INTEGER*4 

N  max 

REAL*4 

PI 

PARAMETER 

(PI  -  3.141593,  N  max  -  262144) 

C  Explicit  Type  Declarations  for  all  Variedjles  and  Arrays 


INTEGER* 4 
INTEGER*4 

LUCIN,  LUCOUT,  N,  N2,  COUNT,  U,  L2,  L3 
I  STATUS,  Nz,  Nraitp 

REAL*4 

REAL*4 

VERSION  NUMBER,  XI,  Yl(N  max) 

X2,  Y2(N_max),  DX,  DX2,  Lll,  L22 

CHARACTER*16 

CHARACTER*16 

CHARACTER*16 

CHARACnER*32 

C3iARACTER*80 

CHARACTER*80 


DATA_X,  DATA_Y,  UNITS_X,  UNITS_Y 
DATA_X2,  nATA_Y2,  UNITS_X2,  UNITS_Y2 
RUN_FIIiE,  RUN_FIIiEl,  RQAD_TYPE,  DIR_ECTI(^ 
PROGRAM_NAME 

COREJMAME,  FILEJTYPE,  PAF_FILE,  DIRECTORY 
FILE  NAME 


Initialize  GEDAP  System 
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c 

PROGRAM_NAME  »  'MULTIXY' 

VERSIONJNUMBER  =1.0 

a\LL  OPEN  GEDAP  NOLIST  (  PROGRAM  NAME,  VERSIC»J  NUMBER, 


u 

+  LUCIN,  LUCOUT  ) 

Open  GEDAP  Input  and  Output  File  Streams 

C 

CALL  OPEN  INPUT  FILE  STREAM  (  1,  'name  of 
+  ISTATUS) 

input  file', 

Read  data  from  a  GEDAP  type  VI  input  file 

into  array  Yl 

C 

CALL  READ_GEnAP_Vl  (  1,  Njnax,  N,  DX  ,  Xl,  Yl, 

+  DATA  X,  UNITS  X,  DATA  Y,  UNITS  Y  ) 


r 


Open  GEDAP  Input  amd  Output  File  Streams 


CALL  OPEN_OUTPUT_FILE_STREAM  (  2,  'name  of  output  file', 
+  ISTATUS  ) 


u  Read  Conversational  Input  Parameters  using  si±)routines  PAR_REAL, 
C  PAR_INTEGER,  PAR  CHAR,  etc. 


CALL  PAR_INTEGER  ('input  (index)  loc.  of  level  change',  Nz) 
CALL  PAR_INTEGER  ('input  (index)  ramp  length',  Nraitp) 

CALL  EAR_REAL  ('input  first  level  multiplier',  Lll) 

CALL  PAR_REAL  ('input  second  level  multiplier',  L22) 


Q  ’k'k’kicit'kiciric'k 


USER  CODE  STARTS  HERE 


********** 


C  Create  'shape'  array 

DO  COUNT  =  1,  Nz  -  Nramp/2 

y2(count)  -  Lll  - 

END  DO 

DO  COUNT  =  Nz  +  Nraiap/2,  N 

Y2( count)  «  L22  ^ 

END  DO 

C  ranp  part  of  array 

DO  COUNT  =  1,  Nraiip 

y2(NZ  ~  Nran5)/2  +  co\jnt)- 

+  ( Float ( count )/Fioat (Nraitp) )*(L22  -  Lll)  +  Lll 

END  DO  -  222 


C 


Multiply  the  two  arrays  together 


DO  COUNT  «  1,N 

Y2(count)  *=  Yl ( COUNT) *Y2( COUNT) 
END  DO 


Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEDAP_1  (  2,  DX,  Xl,  N,  Y2,  DATAJC,  UNITS_X, 

+  DATA  Y,  UNITS  Y,  PROGRAM  NAME,  VERSIOI  NUMBER, I STATUS ) 


Close  GEDAP  and  Terminate  Program 


Program 


SHOCK. FOR 


w  SHOCK. FOR  -  This  program  generates  a  shock  file  whichs 
C  contains  a  patern  of  user  specified  shocks 


PROGRAM  SHOCK 


Program  Description 


Definition  of  GEDAP  Data  Files 
C  To  link  this  code  to  GEDAP  type  @shock-lnk 


C  Development  History 

r _ _ _ 


Version  1.0  by  George  Roddan  (BCR) 


14-OCT-92 


if********itit*1tit*ititit********-k**ifk*-k****1t**1cic*ic*it1i*iiii*it*ii**iiii****miifk****ii 

Parameter  Statements  for  User  Constants  and  Array  Dimensions 


IMPLICIT  NC»^E 

LOGICAL  PAF 

INTEGER*  4  N_max 
REAL*4  PI 

PARAMETER  (PI  -  3.141593,  N  max  -  262144) 


Explicit  Type  Declarations  for  all  Variables  and  Arrays 

INTEGER*4  LUCIN,  LUCOUT,  N,  N2,  COUNT,  Ll,  L2,  L3 
INTEGER*4  ISTATUS,  loc,  K 


REAL* 4 
REAL*4 


VERSICNJNUMBER,  XI,  sh(500) 
X2,  Y(N_max),  DX,  freq,  peak 


CHARACTER*16  DATA_X,  DATA_y,  UNITS_X,  UNITS_Y 
CHARACTER*16  DATA_X2,  DATA_Y2,  UNITS_X2,  UNITS_Y2 
CHARACTER*16  RUN_FILE,  RUN_FILEl,  RQAD_TYPE,  DIR_ECTIC»I 
CHARACTER* 32  PROGRAM_NAME 

CHARACirER*80  CORE__NAME,  FILE_TYPE,  PAF_FILE,  DIRECTORY 
CHARACTER*80  FILE  NAME 


Initialize  GEDAP  System 


U  t.  -  -J  u  U  C  •  -  -J  CJ  6  C  J  u 


PROGRAMJIAME  «  'SHOCK' 

VERSION_NUMBER  -  1.0 

CALL  OPEN_GEDAP_NOLIST  (  PROGRAM_NAME,  VERSIC»I_NUMBER, 
+  LUCIN,  LUCOUT  ) 


Open  GEDAP  Input  and  Output  File  Streams 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPENjOtJTPUT_FILE_STREAM  (  3,  'name  of  output  file', 
+  ISTATUS  ) 


Read  Conversational  Input  Parameters  using  siabroutines  PAR_REAL, 
PAR_INTEGER,  PAR_CHAR,  etc. 


CALL  PAR_INTEGER  ('Enter  length  of  record  ',  N  ) 
CAll  PAR_INTEGER  ('Enter  no.  of  shocks',  N2) 


**********  USER  CODE  STARTS  HERE  ********** 


Initialize  array 

DO  COUNT  «  1,N 
Y(  count)  =  0.0 
END  DO 

Set  time  spacing  at  .01  seconds 
DX  =  .01 

insert  shocks  at  appropriate  locations 
DO  count  “  1,  N2 

CALL  PAR_INTEGER  ('Input  shock  location  (index)',  loc  ) 
CALL  PAR_REAL  ('Input  shock  freq.  (hz)',  freq  ) 

CALL  PAR_REAL  ('Input  shock  peak  (ii\/sec''2 ) ' ,  peak) 

DO  k  -  1,500 

sh(k)  -  peak*1.73*sin(Pl*(k-l)*freq/50.)*exp(-2.5*( 

+  k-l)*freq/100. ) 

ENDDO 

DO  k  -  1,500 

if (loc+k.GE.N)  go  to  90 
y(loc  +  k)  =  sh(k) 


E2©DO 

ENDDO 


C  Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 


90  CALL  WRITE_GEn3AP_l  (  3,  DX,  Xl,  N,  Y,  nATA_X,  UNITS_X, 

+  nATA_Y,  UNITS_Y,  PROGRAM_NAME ,  VERSiaJ_NUMBER, ISTATUS ) 

C  Close  GEDAP  and  Terminate  Program 


CALL  CLOSE_GEDAP  (0) 

CALL  EXIT 

END 


¥ 
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Program  SNIP_GAUSSIAN . FOR 


» 


Jt 
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r  SNIP_GAUSSIAN.FOR  -  This  program  multiplies  a  Gedap  VI  file  with  a  user 
C  specified  "shape"  function  point  for  point  and 

G  outputs  a  single  file. 

C  -  This  program  was  developed  for  creating  signal 

C  control  files  with  varying  rms  levels  in  the 

USAARL  project. 

c - - - 

PROGRAM  SNIP_GAUSSIAN 
C 

n _ 

-  Program  Description 

C  This  program  multiplys  a  GEDAP  VI  file  together  ( usually  the  Gaussian 

-  backround  file  with)  a  user  specified  "shape"  function.  This  "shape" 
function  is  defined  using  input  from  a  command  file  similar  to  the  one 

C  used  to  generate  the  shock  profiles,  which  are  usually  of  the  form, 

"  sh*_gencom. 

C  Information  on  the  location  and  frequency  of  each  generated  shock  will 
C  then  be  used  to  "snip"  out  the  appropriate  portion  of  the  Guassian  so 

1  that  the  shock  can  then  be  inserted  without  affecting  its  absolute 

G  peak  value. 

C 

1  This  program  would  normally  be  run  before  the  shock  and  Gaussiann  files 
^  are  combined  using  GEDAP  program  ADDXY.for. 

Definition  of  GEDAP  Data  Files 


C  To  compile  and  link  this  code  to  GEDAP  type  @SNIP_GAUSSIAN.lnk 
C  This  is  a  command  file  which  contains:  $LINK  SNIP_GAUSSIAN,G2$:GEDAP/LIB 

'I 

J  Development  History 

Version  1.0  by  George  Roddan  (BCR)  08-DEC-92 

C 

/^:4c*:tc***:t::tc4;*:t:**********4:****it:**itt****************:tE*:4c**  *************:*:  ****** 

C  Parameter  Statements  for  User  Constants  and  Array  Dimensions 


IMPLICIT  NONE 

LOGICAL  PAF 
INTEGER*4  N_max 
REAL*4  PI 

PARAMETER  (PI  =  3.141593,  N_max  =  600000) 

C 

C======:^^. - - ==========.^.== 

1  Explicit  Type  Declarations  for  all  Variables  and  Arrays 


INTEGER*4  LUCIN,iUCOUT,  N,  N2,  COUNT 

INTEGERS  ISTATUS,  loc(lOOO),  N.LENGTH,  N.SHOCKS 


REALM 

REALM 


VERSION.NUMBER,  XI,  Yl(N_max),K ,  freq(lOOO) 
X2,  Y2(N_max),  DX,  DX2,  LI  1(100),  peak(lOOO) 


CHARACTER*16  DATA_X,  DATA_Y,  UNrrS_X,  UNTTS.Y 
CHARACTER*  16  DATA_X2.  DATA_Y2.  UNrrS_X2,  UNrrS_Y2 
CHARACTER*16  RUN_FE.E.  RUN  FILEl,  ROAD_TYPE,  DIR.ECnON 
CHARACTER*32  PROGRAM_NAME 

CHARACTER*80  CORE_NAME,  FILE_TYPE,  PAF_FILE,  DIRECTORY 
CHARACTER*80  FILE_NAME 

Initialize  GEDAP  System 


PROGRAM_NAM&  ’MULTIXY’ 

VERSION  NUMBER  =  1.0 

CALL  OPEN_GEDAP_NOLIST  ( PROGRAM_NAME,  VERSION_NUMBER, 
+  LUCIN,  LUCOUT ) 


C========^===========^ 

^  Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_INPUT_FILE_STREAM  ( 1,  ’name  of  input  Gaussian 
+  file’,  ISTATUS) 


Read  data  from  a  GEDAP  type  VI  input  file  into  array  Y1 

C==— — =r=^r-T=Tr================:======== 

r 

CALL  READ  GEDAP.Vl  ( 1,  N  max,  N,  DX  ,  XI,  Yl, 

+  dataJx,  units_x,  data  Y,  UNTTS.Y  ) 


C  Open  GEDAP  Input  and  Output  File  Streams 


CALL  0PEN_0UTPUT_FILE_STREAM  ( 2,  ’name  of  output  Gaussian 
+  file’,ISTATUS ) 


C  Read  Conversational  Input  Parameters  using  subroutines  PAR_REAL, 
■  PAR.INTEGER,  PAR_CHAR,  etc. 


CALL  PAR_INTEGER  (’Enter  length  of  record  ’,N_length  ) 
CALL  PAR_INTEGER  (’Enter  no.  of  shocks’,  N_shocks) 

DOK=l  ,N_shocks 

CALL  PAR_INTEGER  (’input  shock  location  (index)’,  loc(k)) 
CALL  PAR_REAL  (’input  shock  freq.  (hz)’,  freq(k)) 

CALL  PAR_REAL  (’input  shock  peak  (m/sec''2)’,  peak(k)) 

END  DO 


^  **********  USER 
0========== 


CODE  STARTS  HERE 


********** 
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:  Create  ’shape’  array 

DX=  .01 

!  First  get  initialize  "shape"  array  equal  to  one  at  each  point 
DOK=  l.NJength 

Y2(k)  =  1.0  !  shape  array 

END  DO 

C  Next  put  equal  to  0.0  the  appropriate  locations  in  the  shape  array. 

C  When  the  input  Gaussian  is  multiplied  by  this  array  the  portions 

;  of  the  signal  where  the  shocks  will  be  inserted  (using  GEDAP  program 

C  ADDXY)  will  be  effectively  "snipped"  out. 

DO  K=  1 ,  N_shocks  !  shock  counter 

N2  =  INTCl.O  /  (freq(k)*DX)) 

DO  COUNT  =  1 ,  N2  !  "snipper" 

Y2(loc(k  +  count  -  1)=  0.0 

END  DO 

END  DO 

I 

C  Multiply  the  two  arrays  together 
DO  COUNT  =  1,N 

Y2(count)  =  Yl(COUNT)*Y2(COUNT) 

END  DO 


!  Write  data  from  array  Y  into  a  GEDAP  type  VI  output  file 
C==================: 


CALL  WRITE_GEDAP_1  ( 2,  DX,  XI,  N,  Y2,  DATA_X,  UNITS_X, 

+  DATA_Y,  UNTTS.Y,  PROGRAM_NAME,  VERSION_NUMBER,ISTATUS) 


C= 


Close  GEDAP  and  Terminate  Program 


CALL  CLOSE.GEDAP  (0) 

CALL  EXIT 

END 


231 


Program 


ADDXY.FOR 


232 


C  ADDXY.FOR  -  This  program  adds  two  Gedap  VI  files  together 
C  and  outputs  a  single  file 


C 

C -  - - 

PROGRAM  ADDXY 
C 

^  _ _ _ _ _ _ 

C  Program  Description 

c - - - 

C  This  program  adds  two  GEDAP  VI  files  together.  The  program  assumes  a 
Z  nimober  of  things  about  the  input  files.  They  must  have  the  seune  units 
C  no.  of  points  and  time  spacing. 

C - - - - - 

Z  Definition  of  GEDAP  Data  Files 

C"  ■■  . . .  '  ■■■  "  . . .  '  '  '•  '  - - 

C  To  link  this  code  to  GEDAP  type  @addxy.lnk 


C  Developnent  History 

C - - 

2  Version  1.0  by  George  Roddan  (BCR)  13-OCT-92 

C 


c 

Parameter 

Statements  for  User  Constants  and  Array  Dimensions 

w 

■1 

IMPLICIT 

NC»IE 

LOGICAL 

INTEGER*4 

REAL*4 

PAF 

N  max 

PI 

(PI  =  3.141593,  Njnax  -  262144) 

c 

PARAMETER 

Explicit  IVP®  Declarations  for  all  Variables  and  Arrays 

c 

• 

c 

INTEGER* 4 
INTEGER*4 

LUCIN,  LUCOUT,  N,  N2,  COUNT,  Ll,  L2,  L3 

ISTATUS 

m. 

REAL*4 

EEAL*4 

VERSION  NUMBER,  Xl,  Yl(N  max) 

X2,  Y2(Njnax),  DX,  DX2 

CHARACTER*16 
CHARACTER*16 
CHARACTER*16 
CHARACTER*32 
CHARACTER* 80 
CHARACTER*80 


DATA_X,  DATA_Y,  UNITS_X,  UNITS_Y 
DATA_X2,  DATA_Y2,  UNITS_X2,  UNITS_Y2 
RUN_FILE,  RUN_FILE1,  RQAD_TYPE,  DIR_ECTI{»J 
PROGRAM_NAME 

COREJIAME,  FILE_TYPE,  PAF_FIIiE,  DIRECTORY 
FILE  NAME 
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Initialize  GEDAP  System 


C 


PRCX3RAM_NAME  -  'ADDXY' 

VERSiaJ_NUMBER  -  1.0 

CALL  OPEN_GEnAP_NOLIST  (  PROGRAM_NAME,  VERSIC»I_NUMBER, 
+  LUCIN,  LUCOUT  ) 


Open  GEDAP  Input  and  Output  File  Streams 

CALL  OPEN_INPUT_FILE_STREAM  (  1,  'name  of  first  input  file', 
+  ISTATUS) 

CALL  OPEN_INPUT_FILE_STREAM  (  2,  'name  of  second  input  file', 
+  ISTATUS) 


2  Read  data  from  a  GEDAP  type  VI  input  files  into  arrays  Yl,  and  Y2 

CALL  READ_GEnAP_Vl  (  1,  Njnax,  N,  DX  ,  XI,  Yl, 

+  DATA_X,  UNITSJC,  nATA_Y,  UNITS_Y  ) 

CALL  READ_GEnAP_Vl  (  2,  Njnax,  N2,  DX2  ,  X2,  Y2, 

+  DATA  X2,  UNITS  X2,  DATA  Y2,  UNITS  Y2  ) 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_OUTPUT_FILE_STREAM  (  3,  'name  of  output  file', 
+  ISTATUS  ) 


2  Read  Conversational  Input  Parameters  using  subroutines  PAR_REAL, 
C  PAR  INTEGER,  PAR  CHAR,  etc. 


C  **********  USER  CODE  STARTS  HERE  ********** 


Add  two  arrays  together 
DO  COUNT  -  1,N 

Y2(count)  »  yl(COUNT)  +  Y2(COUNT) 
END  DO 


Write  data  fran  array  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEDAP_1  (  3,  DX,  Xl,  N,  Y2,  DATA_X,  UNITS_X, 

+  DATA  Y,  UNITS  Y,  PROGRAM  NAME,  VERSION  NUMBER, ISTATUS) 


C  Close  GEDAP  and  Terminate  Program 


CALL  CLOSE_GEDAP  (0) 
CALL  EXIT 
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Program 


RAMP .FOR 
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c - 

C  RAMP.FOR  -  This  program  tailors  a  Gedap  VI  file  to  a  slope... 

C 

C  - 

c 

PROGRAM  RAMP 
C 

C - 

C  Program  Description 

C- - 

C  This  program  generates  a  GEDAP  VI  file.  The  program  assumes 
C  that  they  have  the  same  units  as  the  sacrificial  input  file. 

C 

C- - - - 

C  Definition  of  GEDAP  Data  Files 

C - 

C  To  link  this  code  to  GEDAP  type  (S)ramp.lnk 

C - 

C  Development  History 

r* 

c 

C  Version  1.0  by  Brian  Remedios  (BCR)  28-OCT-92 

C 

^  ak  ^  4c  sfc  afe  sk  3k  4c  4c  :4c  :fc  stc  4c afc  3|c  3fc  life  sfe  4c  3k  *  sfe  :4c  :4c  ^  3^  sfc  ^ 

C 

c============================================================ 

C  Parameter  Statements  for  User  Constants  and  Array  Dimensions 
C 

IMPLICIT  NONE 
C 

LOGICAL  PAF 
INTEGER*4  N_max 
REAL*4  PI 

PARAMETER  (PI  =  3.141593,  N_max  =  262144) 

C 

c======================================================== 

C  Explicit  Type  Declarations  for  all  Variables  and  Arrays 

^  _ 

INTEGER*4  LUCIN,  LUCOUT,  COUNT,  LI ,  L2,  L3 

INTEGER*4  ISTATUS,  SL,  LENGTH,  N 
C 

REAL*4  VERSION_NUMBER,Xl,  Yl(N_max),SLOPE 

REAL*4  DX,  DX2 

REAL*4  START_VAL,STOP_VAL 

C 

CHARACTER*  16  DATA_X,  DATA.Y,  UNTTS.X,  UNITS_Y 
CHARACTER*  16  DATA_X2,  DATA_Y2,  UNITS_X2,  UNITS_Y2 
CHARACTER*16  RUN_FILE,  RUN_FILE1,  ROAD_TYPE,  DIR_ECTION 
CHARACTER*32  PROGRAM_NAME 

CHARA(TrER*80  CORE_NAME,  FILE_TYPE,  PAF.FILE,  DIRECTORY 
CHARACTER*80  FILE_NAME 

C  .  ' 




C  Initialize  GEDAP  System 
C 


■* 


■ 


» 
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PROGRAM  NAM&  ’RAMP’ 


UUUUU  U  U  UUUUU  UUUUUUOUQUUU  U  UOUCJU  uuuu 


VERSION_NUMBER  =  1.0 

CALL  OPEN_GEDAP_NOLIST  (  PROGRAM.NAME,  VERSION_NUMBER, 
+  LUCIN,  LUCOUT ) 


C 

CALL  OPEN_INPUT_FILE_STREAM  (L’Name  of  input  file’, 
+  ISTATUS) 


Open  GEDAP  Output  File  Stream 


CALL  READ_GEDAP_V1(1,  N_max,  N.  DX,  XI,  Yl, 

+  DATA_X,  UNITS_X,  DATA_Y,  UNrrS_Y) 

CALL  PAR_REAL(’Enter  starting  factor’,START_VAL) 
CALL  PAR_REAL(’Enter  ending  factor’,STOP_VAL) 

CALL  PAR_INTEGER(’Enter  stan  of  operation ’,SL) 

CALL  PAR_INTEGER( ’Enter  length  of  data  series’, LENGTH) 


Open  GEDAP  Input  and  Output  File  Streams 


CALL  OPEN_OUTPUT_FILE_STREAM  (  3,  ’Name  of  output  file’, 
+  ISTATUS  ) 


Read  Conversational  Input  Parameters  using  subroutines  PAR_REAL, 
PAR.INTEGER,  PAR.CHAR,  etc. 


USER  CODE  STARTS  HERE 


Create  the  data  series... 

SLOPE  =  (STOP_VAL-START_VAL)/LENGTH 
DO  COUNT=l, LENGTH 

Yl(COUNT+SL)  =  Yl(COUNT+SL)  *  (START_VAL+((COUNT-l)*SLOPE)) 
END  DO 


Write  data  from  airay  Y  into  a  GEDAP  type  VI  output  file 


CALL  WRITE_GEDAP_1  (  3,  DX,  XI,  N,  Yl,  DATA_X,  UNITS_X, 

+  DATA_Y,  UNITS.Y,  PROGRAM_NAME,  VERSION_NUMBER,ISTATUS) 


Close  GEDAP  and  Terminate  Program 


CALL  CLOSE_GEDAP  (0) 

CALL  EXIT 

END 
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Program 


TOUSA.COM 


.$!  Reformat  three  ascii  files  into  a  single  binary  12  file 
$! 

$!  by  BR  Oct  14,  1992 
$ 

$  FORTRAN/NOLIST/OBJECT=TOUSA.OBJ  SYSSINPUT 


*■ 


C  Reformat  an  ascii  file  into  binary 

C  -  The  output  fields  are  all  1*2  binary  written  in  fixed  length 
C  512  byte  records.  Records  are  grouped  in  threes  (ie.  rec  1  =  X  values, 
C  rec  2  =  Y  values,  rec  3  =  Z  values) 

C  -  The  inputs  are  read  as  15  (no  zero  padding)  with  new  records  for 

C  each  X,Y,Z  grouping. 


IMPLICIT  NONE 
INTEGER*2 1,  J 
INTEGER*2  ARRAY(  3,256) 

INTEGER*4  COUNT_IN  /O/,  COUNT.OUT  /O/ 

C 

C 

OPEN(  5,  STATUS=’OLD’,  READONLY) 

OPEN(  7.  STATUS=’OLD’,  READONLY) 

OPEN(  8,  STATUS=’OLD’,  READONLY) 

OPEN(  6,  STATUS=’NEW’,  CARRIAGECONTROL=’LIST’, 
1  RECORDTYPE=’FIXED’,RECL=512) 


DO  WHILE  (.TRUE.) 

DO  J=  1,256 

READ(5,*,END=90)  ARRAY(  U) 
READ(7,*,END=90)  ARRAY(  2,J) 
READ(8,*,END=90)  ARRAY(  3  J) 
1000  FORMAT(I5) 

COUNTJN  =  COUNT.IN  +  1 
END  DO 


DO  I  =  1,3 

WRrrE(6,2000)  (ARRAY(  I,J),  J=l,256) 
2000  FORMAT(  256A2) 

COUNT_OUT  =  COUNT_OUT  +  1 
END  DO 
END  DO 

90  TYPE  *,  ’  ’ 

TYPE  *,  ’#  of  ascii  records  in:’,  COUNTJN 
TYPE  *,  ’#  of  binary  records  out:’,  COUNT_OUT 
TYPE  *,  ’  ’ 

CALL  EXIT 
END 

$  LINK/NOMAP  TOUSA 
$ 

$  ASSIGNAJSER  ’PI’  FOR005 
$  ASSIGN/USER  ’P2’  FOR007 
$  ASSIGN/USER  ’P3’  FOR008 
$  ASSIGN/USER  ’P4’  FOR006 
$ 

$  RUN  TOUSA.EXE 
$ 

$  DELETE/NOCONF  TOUSA.OBJ;* 

$EXIT 
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Example 


Batch  File 
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$  ACCUMULATE  AAA 

$  TRANSFORMl  !  **************  TRANSFORMS  FILE  FROM  G'S  TO  M/SEC " 2  ********* * 

1  I  number  of  prog,  cycles 

'Pi'  !  name  of  input  Data  File 

CH  !  name  of  GEDAP  output  data  File  [.001] 

9.81  1  transformation  constant  A  [1]  for  eq.  y=Ax  +  B 

0.0  !  transformation  constant  B  [0] 

$  RUN  EXE:FILTV2  I  ****  FILTERS  TIME  SERIES  ******************************** 
1  i  number  of  program  cycles  [1] 

CH  1  input  file  containing  time  series  [.001] 

CH_F  !  output  file  containing  filtered  time  series  [.001] 

0  1  weighting  option  British  Standard  z  -  weighting 

!  resampling  option  [0] 

$  STAT4  !  *********  CALCULATES  RMS,  MIN,  MAX,  ETC.  ********************* 

1  !  number  of  program  cycles  [1] 

CH_F  !  name  of  input  file  [.001] 

!  confidence  level  for  interval  estimates  (percent)  [95.0] 

$  RUN  EXE:CREST3  ! * *CALCULATES  CREST  FACTOR,  VDV,  eVDV,  and  high  order  stats 
1  !  number  of  program  cycles  [1] 

CH_F  !  input  file  containing  time  series  [.001] 

CH_F  !  output  file  containing  time  series  [.001] 

$  STAT2  1**  CALCULATES  PROBABILITY  DENSITY,  ETC.  *********************** 

1  !  number  of  program  cycles  [1] 

CH_F  !  input  file  containing  time  series  [.001] 

DENS  !  prefix  for  output  files:  DENS_PDH,  DENS_CDH,  DENS_PDG,  DENS_CDG 

50  !  no.  of  cells 

1  !  cell  width  option 

yes  !  apply  a  Gaussian  goodness-of-f it  test? 

$  RUN  EXE:IMPULSE  !***  CALCULATES  IMPULSIVENESS  **************************** 

1  !  number  of  program  cycles  [1] 

DENS_CDH  1  input  file  containing  cumulative  probability  distribution 
DENS_CDH  !  output  file  containing  cumulative  probability  distribution 
$  VSD  I  *******  CALCULATES  SPECTRAL  DENSITY  FUNCTION  ***************** 

1  !  number  of  program  cycles  [1] 

CH_F  !  name  of  time  series  input  file  [.001] 

!  name  of  spectral  density  output  file  [ CH_F_SPEC . 001 ] 

NO  !  Use  default  parameters?  [Yes]: 

!  data  window  option  [1] 

.1  '  I  Alpha  (0.0  to  0.5)  [0.0] 

I  filter  bandwidth  in  Hz  (or  0.0  to  specify  dof  instead)  [0.0] 

20  !  dof  =  degrees  of  freedom  per  spectral  estimate  [20] 

!  Fl  =  low  frequency  limit  (Hz)  [0.0] 

I  F2  =  high  frequency  limit  (Hz)  [Nyquist  frequency] 

Y  !  Generate  80%  confidence  interval  file?  [No]: 

I  Generate  spectral  parameter  files?  [No]: 

$  RUN  EXE:ISO  ******  1/3  OCTAVE  ANALYSIS  *********************************** 
1  Inumber  of  program  cycles  [1] 

ch_f_spec  Iname  of  input  file  [.001] 
ch_f_spec  Iname  of  output  file  [.001] 

$  RUN  EXE:SPECF  I **CALCULATES  CREST  FACTOR,  SPECF  OF  THIRD  OCTAVE  SPECTRUM** 
dens_cdh  I  input  file  containing  cumulative  density,  and  I(.97) 

ch_f_spec  I  input  file  containing  time  series  [.001] 
ch  f_specF  I  output  file  containing  filtered  time  series  [.001] 

'pT'  I  run  file  name 

'P2'  I  speed 

'P3'  I  road  type 

'P4'  !  accel  axis  direction 

$  ACCUMULATE  OFF 

$I 

$  EXPORT_PAR2  -  '  241 

AAA  1  name  of  Header  Parameter  input  file 

1  I  channel  no. 

14  I  no.  of  parameters  to  be  collected 

SIGNAL_TYPE 

OB  RMTT  RMS 


SPECF 

SPEED 

CREST_FACTOR 

STAT_MAX 

STAT_MIN 

STAT_STD_DEV 

RMQ 

RMTT 

VRV6  0 

VDV6  0 

VTTV60 

PZ.DAT  I  NAME  OF  ASCII  FILE 
$  DELETE/NOCONFIRM  AAA. 00 
$  DELETE/NOCONFIRM  ch*.*; 

$  DELETE/NOCONFIRM  dens*.*;* 

$  EXIT 


o'P  -K 


Appendix  D 


A 


Seat  Motion  Data 

(Note:  Apendixes  D-1  to  D-23  are  bound  separately) 


Appendix 

Vehicle 

Analysis  Method 

D-1 

FAV 

BS-6841* 

D-2 

M2  Bradley 

BS-6841 

D-3 

MlAl 

ISO-2631** 

D-4 

MlAl 

BS-6841 

D-5 

MlAl 

FG*** 

D-6 

MlAl  HTT 

ISO-2631 

D-7 

MlAl  HTT 

BS-6841 

D-8 

MlAl  HTT 

FG 

D-9 

M1026  HMMWV 

ISO-2631 

D-10 

M1026  HMMWV 

BS-6841 

D-11 

M1026  HMMWV 

FG 

D-12 

Ml 09 A3 

ISO-2631 

D-13 

Ml  09  A3 

BS-6841 

D-14 

Ml 09 A3 

FG 

D-15 

M923A2 

ISO-2631 

D-1 6 

M923A2 

BS-6841 

D-17 

M923A2 

FG 

D-18 

XM1076 

ISO-2631 

D-19 

XM1076 

BS-6841 

D-20 

XM1076 

FG 

D-21 

M2HS  Bradley 

ISO-2631 

D-22 

M2HS  Bradley 

BS-6841 

D-23 

M2HS  Bradley 

FG 

*  British  Standard  6841 
**  ISO  Standard  2631 
***  Fairley-Grif fin  Model 
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SHOCK 

#OF 

%  OF  TOTAL 

{  PEAK  AMP.  RANGE 

1  FREQ.  RANGE  (Hz) 

1  No./mln.  1 

TYPE 

SHOCKS 

SHOCKS 

+  V® 

-V® 

min. 

max. 

min. 

max. 

Z 

+1 

- 

- 

- 

- 

- 

- 

- 

- 

+2 

1 

100 

1.7 

-1.4 

7.1 

7.1 

+3 

- 

- 

- 

- 

- 

- 

- 

- 

+4 

- 

- 

- 

- 

- 

- 

- 

- 

-1 

- 

- 

- 

- 

- 

- 

- 

- 

-2 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

- 

Total  #  shocks 

1 

Y 

+1 

- 

- 

- 

- 

- 

- 

- 

- 

+2 

- 

- 

- 

- 

- 

- 

- 

- 

43 

- 

- 

- 

- 

- 

- 

- 

- 

+4 

- 

- 

- 

- 

- 

- 

- 

- 

-1 

- 

- 

- 

. 

. 

. 

-2 

- 

- 

. 

. 

- 

. 

. 

-3 

1 

100 

-1.0 

1.0 

5.3 

6.3 

-4 

- 

- 

. 

- 

- 

- 

. 

. 

Total  #  shocks 

1 

Total  #  of  shocks  with  f  <60  Hz: 
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_ _  #  (I)  SHOCKS  ($)  ($)  TYPE  [  -  v«  (Hz) 


FRQM1076.XLS 


VEHICli: 

Ml  076 

LocationsCs): 

Driver 

DIRECTION 

SHOCK 

#OF 

%  OF  TOTAL 

{  PEAK  AMP.  RANGE 

1  FREQ.  RANGE  (Hz} 

1  No./mln.  1 

TYPE 

SHOCKS 

SHOCKS 

-VO 

min. 

max. 

min. 

max. 

Z 

+1 

- 

- 

- 

- 

- 

- 

15 

+2 

- 

- 

- 

- 

- 

- 

- 

+3 

- 

- 

- 

- 

- 

- 

- 

+A 

- 

- 

- 

- 

- 

- 

- 

-] 

- 

- 

- 

- 

- 

- 

- 

-2 

2 

33.33 

-2.3 

1.0 

3.0 

3.0 

-3 

2 

33.33 

-1.1 

-1.9 

2.4 

2.7 

-4 

- 

- 

- 

- 

- 

- 

- 

-5 

1 

16.67 

-1.3 

1.1 

2.7 

2.7 

-6 

1 

16.67 

-1.3 

1.0 

3.2 

3.2 

Total  #  shocks 

6 

Y 

+1 

1 

100 

1.2 

-0.1 

26 

26 

3 

Total  #  shocks 

1 

X 

-1 

6 

75 

-3. 

0.7 

3.2 

9.0 

24 

-2 

2 

25 

-1.8 

1.0 

8.0 

8.0 

Total  #  shocks 

8 

Total  #  of  shocks  with  f  <60  Hz: 

TYPS  X.XLS 


-9 


41 


TITLE: 

1.0  TYPICAL  SHOCKS 

DIRECTION: 

X 

SHOCK 

%  OF  TOTAL 

PEAK  AMP.  RANGE  (G) 

FREQ.  RANGE  (Hz) 

No./min.  1 

TYPE 

SHOCKS 

+  ve 

-ve 

min. 

max. 

min. 

max. 

+1 

9 

1.0 

-0.5 

26.0 

26 

3 

24 

+2 

+3 

44 

9 

1.5 

-3.1 

43.0 

43.0 

-1 

55 

-3.0 

0.7 

3.2 

9.0 

-2 

18 

-1.8 

1.0 

8.0 

8.0 

-3 

9 

-5.5 

4.3 

21.0 

21.0 

■4 

[Total  #  of  shocks  with  f  <60  Hz:  1 

11 

i 

% 
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TYPS_Z.XLS 


TITLE: 

1.0  TYPICAL  SHOCKS 

DIRECTION: 

z 

SHOCK 

X  OF  TOTAL 

1  PEAK  AMP.  RANGE  (G) 

i  FREQ.  RANGE  (Hz) 

1  No./mln.  1 

TYPE 

SHOCKS 

+  V« 

-v« 

min. 

max. 

min. 

max. 

+1 

30 

5.0 

-1.0 

0.9 

24 

3 

27 

+2 

18 

3.6 

-15 

1.60 

7.1 

1 

5 

+3 

6 

1.5 

-1.3 

1.6 

15.0 

3 

5 

+4 

9 

4.2 

-1.5 

1.6 

1.9 

3 

4 

+5 

3 

2.1 

-1.7 

32.0 

32.0 

3 

3 

-1 

5 

-2.1 

- 

2.1 

8.5 

3 

5 

-2 

12 

-2.3 

1.8 

1.2 

3.0 

3 

5 

-3 

8 

-2.5 

1.9 

2.1 

51.0 

3 

6 

■4 

3 

-2.7 

1.8 

26 

26 

3 

3 

-5 

3 

-1.3 

1.1 

2.7 

2.7 

3 

3 

■6 

3 

-1.6 

1.0 

3.2 

3.2 

3 

3 

All  shock  types: 

4 

M 

!Total#ofshockswfthf<60H2:  1 

33 
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Cross-Country  Shocks 
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SHKM2HS3.XLS 


376 


377 


TITLE: 


2.0  CROSS-COUNTRY  SHOCKS 


DIRECTION: 


SHOCK 


%  OF  TOTAL 


PEAK  AMP.  RANGE  (G) 


FREQ.  RANGE  (Hz) 


No./mln. 


TYPE 


SHOCKS 


+  VO 


-VO 


min. 


max. 


min. 


max. 


+1 


14 


4.0 


-1.7 


0.8 


2.8 


+2 


24 


6.5 


-2.0 


0.95 


6.0 


+3 


11 


3.2 


-1.2 


1.1 


8.1 


+4 


2.6 


-3.6 


32.0 


32.0 


23 


-2.0 


0.5 


2.0 


-2 


20 


-2.2 


2.0 


1.6 


21.0 


3.0 


5.71 


5.71 


All  shock  types: 


19 


39 


Totol  #  of  shocks  with  f  <60  Hz: 


30 
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Appendix  G 


List  of  symbols  and  abbreviations 


a 

♦ 

a 


a 

a(0 

a(Li) 

Oi ,  ..a* 


^  max 
^  min 

^(RMS) 
Q  IRUQ) 

ai/(0 

Qi/(;eM7) 


acceleration 

positive  acceleration  amplitude  exceeded  for  a 
fraction  of  time  specified  by  P^a.*) 

negative  acceleration  amplitude  exceeded  for  a 
fraction  of  time  specified  by  P{a~) 

acceleration-time  function 
acceleration  time  series 

acceleration  amplitudes  of  waveform  components  at 
frequencies 

maximum  (peak)  positive  acceleration  amplitude 
maximum  (peak)  negative  acceleration  amplitude 
generalized  time-averaged  root  mean  acceleration 
root  mean  square  acceleration 
root  mean  quad  acceleration 

frequency  weighted  acceleration  time  function 

frequency  weighted,  root  mean  square  acceleration 

frequency  weighted,  root  mean  quad  acceleration 

frequency  weighted,  root  mean  twelfth  accelera¬ 
tion 


A(a)) 

ASCC 


time  series  expressing  spring  compression  in  bio 
dynamic  model 

Fourier  transform  of  a(0 

RMS  acceleration  in  1/3  octave  frequency  band 

maximum  1/3  octave  frequency  band  RMS  accelera¬ 
tion 

Air  Standardization  Coordinating  Committee 


a 

h 


BCR 

BS 


recovery  rate 

intercept  of  discomfort  contours 

British  Columbia  Research  Corporation 
British  standard 


T 


Cy 

C 

C„ 

GREST 


y"*  weight  of  dose  function  element 

viscous  resistance  to  motion,  in  biodynamic  model  ^ 
critical  viscous  damping,  in  biodynamic  model 
crest  factor  of  waveform 


generalized  dose  function,  moment  m,  root  r 


>  ^)2.2 
DCav,T^^  ^ 


"energy-equivalent”  dose  function  for  OuCO 
dose  function  called  VDV 


^  n[ 


DOS 

DRI 

(DRI,„gx)n^ 

(DRI), 

6 

6  j ,  ..6* 

6* 

.AT],,., 


time  series  dose  function,  moment  m,  root  r, 
constructed  from  N  dose  elements 

time  series  dose  function,  moment  m,  root  r,  for 
exposure  to  N  q  shocks 

disk  operating  system  for  personal  computers 
dynamic  response  index 

maximum  allowable  DRI  corresponding  to  the 
observed  nximber  of  shocks,  n, 

mean  DRI  value  of  q"*  range  of  shocks 
decay  rate  of  waveform 

decay  rates  of  waveform  components  at  frequencies 

dose  function  element,  moment  m,  root  r,  for  a 
time  series  (abbreviated  form) 

k‘^  dose  function  element,  moment  m,  root  r,  for  a 
time  series 

most  recent  (current)  time  series  dose  function 
element,  moment  m,  root  r 
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6s 

time  series  dose  function  element,  moment  m,  root 
r,  for  exposure  to  one  shock  (abbreviated  form) 

time  separation  of  elements  (samples)  in  a  time 
series 

^  max 

maximum  spring  compression,  in  biodynamic  model 

AT 

time  interval 

Eda^) 

second-order  moment 

£(a") 

n  "“-order  moment 

EMG 

electromyography 

/ 

frequency 

f  l  y  f  2  <  f  2  <  • 

harmonically-related  frequencies 

FFT 

fast  Fourier  transformation 

FORTRAN 

computer  programming  language  (FORmula  TRANsla- 
tion) 

g 

acceleration  due  to  gravity  (unit  of  accelera¬ 
tion) 

GEDAP 

GEneral  Data  Acquisition  and  Processing  software 
system 

H(a)) 

frequency  weighting  function 

i 

r'l 

^  P{a) 

impulsiveness  defined  for  a  probability  value 

Pda) 

1(0.97) 

impulsiveness  for  probability  value  T(a)=0.97 
(signal  test  parameter) 

ISO 

International  Organization  for  Standardization 

spring  stiffness,  in  biodynamic  model 

K, 

constants 

KURT 

kurtosis 

m 

m.p.h. 

m.  s”2 


in.s-l*75 

M 

MARS 

MIL 

MlAl 

M109A3 

M2HS 

n 

N 

N, 

Nq 


moment  of  dose  function,  or  expected  value 
miles  per  hour 

meters  per  second,  per  second  (unit  of  accelera¬ 
tion) 

meters  per  second  to  the  power  1.75  (unit  of  VDV) 

mass,  in  biodynamic  model 

multi-axis  ride  simulator 

military 

tank 

self-propelled  howitzer 
armored  fighting  vehicle 

number  of  points  per  dose  element 

number  of  shocks  observed  in  the  range  of  DRI 
values 

number  of  dose  elements  in  time  series 

maximum  allowable  number  of  shocks  for  the 
range  of  DRI  values 

total  number  of  shocks 


CO 

OJ  j  ,  ..CO* 


co„ 


angular  frequency 

angular  frequencies  of  waveform  components  at 
frequencies  /j,../* 

undamped  natural  (resonance)  frequency  of  biody¬ 
namic  model 


P(a) 

P(a) 

PDF 


acceleration  amplitude  probability  density  dis¬ 
tribution 

(cumulative)  acceleration  amplitude  probability 
distribution 

Digital  Equipment  Corporation  mini-computer  type 
(Peripheral  Data  Processor) 


Q 


number  of  ranges  of  DRI  values 


r 


root  of  dose  function 


RMQ 

RMS 

RMT 

RMT/RMS 

s 

SPECF 

STD 

a 

t 

T 

Tq 

TGV 

U 

USAARL 

VAX 

VDV 

VHS 

VMS 

Wb 

Wd 

W.E.S. 

X 

y 


root  mean  quad  acceleration 
root  mean  square  acceleration 
root  mean  twelfth  acceleration 
signal  test  parameter 
slope  of  discomfort  contours 

signal  test  parameter  (SPECtral  Factor) 
standard 

standard  deviation  of  Gaussian  random  distribu¬ 
tion 

time 

exposure  time 

total  exposure  time  to  dose  elements  containing 
shocks 

tactical  ground  vehicle 

parameter  identifying  element  of  time  series 

boxcar  function  (time  function  with  "top-hat" 
profile) 

U.S.  Army  Aeromedical  Laboratory 

Digital  Equipment  Corporation  mini-computer  type 
vibration  dose  value 

tape-recording  format  (for  Video  Home  System) 

Digital  Equipment  Corporation  mini-computer  oper¬ 
ating  system  (Virtual  Memory  System) 

frequency  weighting  for  the  Z  direction  in  BS 
6841  (1987)  (Z  axis) 

frequency  weighting  for  the  X  and  Y  directions  in 
BS  6841  (1987)  (X  and  Y  axes) 

Waterways  Experimental  Station 

back-to-front  (fore-and-aft)  direction  of  motion 
right-to-left  (side-to-side)  direction  of  motion 


z 


foot-  or  buttocks-to-head  (vertical)  direction  of 
motion 

damping  ratio  (fraction  of  critical  damping) ,  in 
biodynamic  model 


f 


r 
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